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(57) Abstract 

The invention provides a single chip implementation of a digital receiver for multicarrier signals that are transmitted by orthogonal 
frequency division multiplexing. Improved channel estimation and correction circuitry are provided. The receiver has highly accurate 
sampling rate control and frequecy control circuitry. BCH decoding of tps data carriers is achieved with minimal resources with an 
arrangement that includes a small Galois field multiplier. An improved FFT window synchronization circuit is coupled to the resampling 
circuit for locating the boundary of the guard interval transmitted with the active frame of the signal. A real-time pipelined FFT processor 
is operationally associated. with the FFT window synchronization circuit and operates with reduced memory requirements. 



I' <WO I ^ 




FOR THE PURPOSES OF INFORMATION ONLY 
Codes used to identify States party to the PCT on the front pages of pamphlets publishing international applications under the PCT. 



AL 


Albania 


i£S 


Spain 


LS 


Lesotho 


SI 


Slovenia 


AM 


Armenia 


VI 


Finland 


LT 


Lithuania 


SK 


Slovakia 


AT 


Austria 


FR 


France 


LU 


Luxembourg 


SN 


Senegal 


All 


Australia 


GA 


Gabon 


LV 


Latvia 


sz 


Swaziland 


AZ 


Azerbaijan 


GB 


United Kingdom 


MC 


Monaco 


ID 


Chad 


BA 


Bosnia and Herzegovina 


GE 


Georgia 


MD 


Republic of Moldova 


TG 


Togo 


nrt 


Barbados 


Gil 


Ghana 


MG 


Madagascar 


TJ 


Tajikistan 


RE 


Belgium 


GN 


Guinea 


MK 


The former Yugoslav 


TM 


Turkmenistan 


BF 


Burkina Faso 


GR 


Greece 




Republic of Macedonia 


TR 


Turkey 


BG 


Bulgaria 


IIU 


Hungary 


ML 


Mali 


TT 


Trinidad and Tobago 


BJ 


Benin 


IE 


Ireland 


MN 


- Mongolia 


UA 


Ukraine 


BK 


Brazil 


1L 


Israel 


MR 


Mauritania 


UG 


Uganda 


BY 


Belarus 


IS 


Iceland 


MW 


Malawi 


US . 


United States of America 


CA 


Canada 


, IT- 


Italy 


MX 


Mcx ico 


uz" 


Uzbekistan 


CF 


Central African Republic 


JP 


Japan 


NE 


Niger 


VN 


Vict Nam 


CG 


Congo 


KE 


Kenya 


NL 


Netherlands 


YU 


Yugoslavia 


CH 


Switzerland 


KG 


Kyrgyzstan 


NO 


Norway 


zw 


Zimbabwe 


CI 


Cote d'l voire 


KP 


Democratic People's 


NZ 


New Zealand 






CM 


Cameroon 




Republic of Korea 


PL 


Poland 






CN 


China 


KR 


Republic of Korea 


PT 


Portugal 






CU 


Cuba 


KZ 


Kazakstan 


KO 


Romania 






CZ 


Czech Republic 


I.C 


Saint Lucia 


KU 


Russian Federation 






DE 


Germany 


LI 


Liechtenstein 


SD 


Sudan 






DK 


Denmark 


LK 


Sri Lanka 


SK 


Sweden 






EE 


Estonia 


LR 


Liberia 


SG 


Singapore 







WO 98/19410 ^ PCT/US97/I89U 



SINGLE CHIP VLSI IMPLEMENTATION OF A DIGITAL RECEIVER EMPLOYING 
ORTHOGONAL FREQUENCY DIVISION MULTIPLEXING 

5 This invention relates to receivers of electromagnetic signals employing 

multicarrier modulation. More particularly this invention relates to a digital receiver which 
is implemented on a single VLSI chip for receiving transmissions employing orthogonal 
frequency division multiplexing, and which is suitable for the reception of digital video 
broadcasts. 

10 Coded orthogonal frequency division multiplexing ("COFDM") has been proposed 

for digital audio and digital video broadcasting, both of which require efficient use of 
limited bandwidth, and a method of transmission which is reliable in the face of several 
effects. For example the impulse response of a typical channel can be modeled as the 
sum of a plurality of Dirac pulses having different delays. Each pulse is subject to a 

15 multiplication factor, in which the amplitude generally follows a Rayleigh law. Such a 
pulse train can extend over several microseconds, making unencoded transmission at 
high bit rates unreliable. In addition to random noise, impulse noise, and fading, other 
major difficulties in digital terrestrial transmissions at high data rates include multipath 
propagation, and adjacent channel interference, where the nearby frequencies have 

20 highly correlated signal variations. COFDM is particularly suitable for these applications. 
In practical COFDM arrangements, relatively small amounts of data are modulated onto 
each of a large number of carriers that are closely spaced in frequency. The duration 
of a data symbol is increased in the same ratio as the number of carriers or 
subchannels, so that inter-symbol interference is markedly reduced. 

25 Multiplexing according to COFDM is illustrated in Figs. 1 and 2. wherein the 

spectrum of a single COFDM carrier or subchannel is indicated by line 2. A set of carrier 
frequencies is indicated by the superimposed waveforms in Fig. 2, where orthogonality 
conditions are satisfied. In general two real-valued functions are orthogonal if 



30 



[iy p (t)4J q (t)dt = K ' (1) 



where K is a constant, and K = 0 if p * q; K *0 if p = q. Practical encoding and decoding 
of signals according to COFDM relies heavily on the fast Fourier transform ( ! 'FFT M ), as 
35 can be appreciated from .the following equations. 
The signal of a carrier c is given by 

s c (t) - A.(t)e il ^ ^ (2) 
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where A c is the data at time t, oo c is the frequency of the carrier, and (J> c is the phase. N 
carriers in the COFDM signal is given by 

s s (t) = (1/N) £ A n (t)e j^^, " , •*" (,,, (3) 

n = 0 

co n = co 0 + nAu) (4) 
Sampling over one symbol period, then 

<M*> (5) 

A c(t)^A n ( 6 ) 
With a sampling frequency of 1/T, the resulting signal is represented by 



15 s s(f) = (VN) £ A^e^"*"^ 7 ^ (7) 

n - 0 



Sampling over the period of one data symbol t = NT, with co 0 = 0, 

N -1 

20 s s (kT) = (1/N) A n e i N>' (nAo))kT (8) 

n - 0 

which compares with the general form of the inverse discrete Fourier transform: 

N - 1 

g(kT) - (1/N) Y, G(n/(kT))e ,nn(k/N) (9) 

25 n - 0 

In the above equations A n ef\ is the input signal in the sampled frequency domain, and 
s s (kT) is the time domain representation. It is known that increasing the size of the FFT 
provides longer symbol durations and improves ruggedness of the system as regards 
echoes which exceed the length of the guard interval. However computational 

30 complexity increases according to Nidg 2 N, and is a practical limitation. 

In the presence of intersymbol interference caused by the transmission chgnnel,* 
orthogonality between the signals is not maintained, One approach to this problem has 
been to deliberately sacrifice some of the emitted energy by preceding each symbol in 
the time domain by an interval which exceeds the memory of the channel, and any 

35 multipath delay. The "guard interval" so chosen is large enough to absorb any 
intersymbol interference, and is established by preceding each symbol by a replication 
of a portion of itself. The replication is typically a cyclic extension of the terminal portion 
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of the symbol. Referring to Fig. 3, a data symbol 4 has an active interval 6 which 
contains all the data transmitted in the symbol. The terminal portion 8 of the active 
interval 6 is repeated at the beginning of the symbol as the guard interval 10. The 
COFDM signal is represented by the solid line 12. It is possible to cyclically repeat the 
5 initial portion of the active interval 6 at the end of the symbol. 

Transmission of COFDM data can be accomplished according to the known 
general scheme shown in Fig. 4. A serial data stream 14 is converted to a series of 
parallel streams 16 in a serial-to-parallel converter 18. Each of the parallel streams 16 
is grouped into x bits each to form a complex number, where x determines the signal 

10 constellation of its associated parallel stream. After outer coding and interleaving in 
block 20 pilot carriers are inserted via a signal mapper 22 for use in synchronization and 
channel estimation in the receiver. The pilot carriers are typically of two types. Continual 
pilot carriers are transmitted in the same location in each symbol, with the same phase 
and amplitude. In the receiver, these are utilized for phase noise cancellation, automatic 

15 frequency control, and time/sampling synchronization. Scattered pilot carriers are 
distributed throughout the symbol, and their location typically changes from symbol to 
symbol. They are primarily useful in channel estimation. Next the complex numbers are 
modulated at baseband by the inverse fast fourier transform ("IFFT") in block 24. A v 
guard interval is then inserted at block 26. The discrete symbols are then converted to 

20 analog, typically low-pass filtered, and then upconverted to radiofrequency in block 28. 
The signal is then transmitted through a channel 30 and received in a receiver 32. As 
is well known in the art, the receiver applies an inverse of the transmission process to - 
obtain the transmitted information. In particular an FFT is applied to demodulate the 
signal. 

25 A modern application of COFDM has been proposed in the European Telecommu- 

nications Standard ETS 300 744 (March 1997), which specifies the framing structure, 
channel coding, and modulation for digital terrestrial television. The specification was 
designed to accommodate digital terrestrial television within the existing spectrum 
allocation for analog transmissions, yet provide adequate protection against high levels 

30 of co-channel interference and adjacent channel interference. A flexible guard interval 
is specified, so that the system can support diverse network 'configurations, while. . 
maintaining high spectral efficiency, and sufficient protection against co-channel 
interference and adjacent channel interference from existing PAL/SECAM services. The 
noted European Telecommunications Standard defines two modes of operation. A "2K 

35 mode", suitable for single transmitter operation and for small single frequency networks 
with limited transmitter distances. An "8K mode" can be used for either single transmitter 
operation or for large single frequency networks. Various levels of quadrature amplitude 
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modulation ("QAM") are supported, as are different inner code rates, in order to balance 
bit rate against ruggedness. The system is intended to accommodate a transport layer 
according to the Moving Picture Experts Group ("MPEG"), and is directly compatible with 
MPEG-2 coded TV signals (ISO/IEC 13818). 

In the noted European Telecommunications Standard data carriers in a COFDM 
frame can be either quadrature phase shift keyed ("QPSK"), 16-QAM, 64-QAM, non- 
uniform 16-QAM, or non-uniform 64-QAM using Gray mapping. 

An important problem in the reception of COFDM transmission is difficulty in 
maintaining synchronizationdue to phase noise and jitter which arise from upconversion 
prior to transmission, downconversion in the receiver, and the front end oscillator in the 
tuner, which is typically a voltage controlled oscillator. Except for provision of pilot 
carriers to aid in synchronization during demodulation, these issues are not specifically 
addressed in the noted European Telecommunications Standard, but are left for the 
implementer to solve. 

Basically phase disturbances are of two types. First, noisy components which 
disturb neighbor carriers in a multicarrier system are called the "foreign noise 
contribution" ("FNC"). Second, a noisy component which disturbs its own carrier is 
referred to as the "own noise contribution". 

Referring to Fig. 5, the position of ideal constellation samples are indicated by u x" 
symbols 34. The effect of foreign noise contribution is stochastic, resulting in Gaussian- 
like noise. Samples perturbed in this manner are indicated on Fig. 5 as circles 36. The 
effects of the own noise contribution is a common rotation of all constellation points, 
indicated as a displacement between each "x" symbol 34 and its associated circle 36. 
This is referred to as the "common phase error", which notably changes from symbol to 
symbol, and must therefore be recalculated each symbol period T s . The common phase 
error may also be interpreted as a mean phase deviation during the symbol period T s . 

In order for the receiver 32 to process the data symbols in a practical system, a 
mathematical operation is performed on the complex signal representing each data 
symbol. Generally this is an FFT. For valid results to be obtained, a particular form of 
timing synchronization is required in order to align the FFT interval with the received 
data symbol: 

It is therefore a primary object of the invention to provide a highly integrated, low 
cost apparatus for the reception of digital broadcasts, such as terrestrial digital video 
broadcasts, which is implemented on a single VLSI chip. 

It is another object of the invention to provide an improved method and apparatus 
for synchronizing a received data symbol with an FFT window in signals transmitted 
according to COFDM. 
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It is yet another object of the invention to improve the stability of digital multicarrier 
receivers in respect of channel estimation. 

It is still another object of the invention to improve the automatic frequency control 
circuitry employed in multicarrier digital receivers. 
5 It is a further object of the invention to improve the automatic sampling rate control 

circuitry employed in multicarrier digital receivers. 

The invention provides a digital receiver for multicarriersignals that are transmitted 
by orthogonal frequency division multiplexing. The multicarrier signal carries a stream 
of data symbols having an active interval, and a guard interval in which the guard 

10 interval is a replication of a portion of the active interval. In the receiver an analog to 
digital converter is coupled to a front end amplifier. An l/Q demodulator is provided for 
recovering in phase and quadrature components from data sampled by the analog to 
digital converter, and an automatic gain control circuit is coupled to the analog to digital 
converter. In a low pass filter circuit accepting I and Q data. from the l/Q demodulator, 

15 the I and Q data are decimated and provided to a resampling circuit. An interpolator in 
the resampling circuit accepts the decimated I and Q data at a first rate and outputs 
resampled I and Q data at a second rate. An FFT window synchronization circuit is 
coupled to the resampling circuit for locating a boundary of the guard interval. A real- 
time pipelined FFT processor is operationally associated with the FFT window 

20 synchronization circuit. Each stage of the FFT processor has a complex coefficient 
multiplier, and an associated memory with a lookup table defined therein for multipli- 
cands being multiplied in the complex coefficient multiplier. Each multiplicand in the 
lookup table is unique in value. A monitor circuit responsive to the FFT window 
synchronization circuit detects a predetermined indication that a boundary between an 

25 active symbol and a guard interval has been located. 

According to an aspect of the invention the FFT window synchronization circuit has 
a first delay element accepting currently arriving resampled I and Q data, and outputting 
delayed resampled I and Q data. A subtracter produces a signal representative of the 
difference between the currently arriving resampled I and Q data and the delayed 

30 resampled I and Q data. In a first circuit the subtracter output signal is converted to a 
signal having a unipolar magnitude, which is preferably the absolute value of the Signal 
provided by the subtracter. A second delay element stores the output-signal of the first 
circuit, and a third delay element receives the delayed output of the second delay 
element. In a second circuit a statistical relationship is calculated between data stored 

35 in the second delay element and data stored in the third delay element. The output of 
the FFT window synchronization circuit is representative of the statistical relationship. 
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Preferably the statistical relationship is the F ratio. The FFT processor is capable of 
operation in a 2K mode and in an 8K mode. 

The FFT processor has an address generator for the memory of each stage, which 
accepts a signal representing the order dependency of a currently required multiplicand, 
5 and generates an address of the memory wherein the currently required multiplicand is 
stored. In a further aspect of the invention each multiplicand is stored in the lookup table 
in order of its respective order dependency for multiplication by the complex coefficient 
multiplier, so that the order dependencies of the multiplicands define an incrementation 
sequence. The address generator has an accumulator for storing a previous address 

10 that was generated thereby, a circuit for calculating an incrementation value of the 
currently required multiplicand responsive to the incrementation sequence, and an 
adder for adding the incrementation value to the previous address. 

In another aspect of the invention there are a plurality of incrementation 
sequences. The multiplicands are stored in row order, wherein in a first row a first 

1 5 incrementation sequence is 0, in a second row a second incrementation sequence is 1 , 
in a third row first and second break points B1 , B2 of a third incrementation sequence 
are respectively determined by the relationships 



20 



N -1 



N 

n 0 



n-0 



and in a fourth row a third break point B3 of a third incrementation sequence is 
25 determined by the relationship 

B3 U = 2 x 4 N +2 

wherein M N represents the memory of an Nth stage of the FFT processor. 

The receiver provides channel estimation and correction circuitry. Pilot location 

30 circuitry receives a transformed digital signal representing a frame from the FFT 
processor, and identifies the position of pilot carriers therein. The pilot carriers are 
spaced apart in a carrier spectrum of the transformed digital signal at intervals K and 
have predetermined magnitudes. The pilot location circuitry has a first circuit for 
computing an order of carriers in the transformed digital signal, positions of said carriers 

35 being calculated modulo K. There are K accumulators coupled to the second circuit for 
accumulating magnitudes of the carriers in the transformed digital signal, the 
accumulated magnitudes defining a set. A~correlation circuit is provided for correlating 
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K sets of accumulated magnitude values with the predetermined magnitudes. In the 
correlation a first member having a position calculated modulo K in of each of the K sets 
is uniquely offset from a start position of the frame. 

According to another aspect of the invention the pilot location circuitry also has a 
5 bit reversal circuit for reversing the bit order of the transformed digital signal. 

According to yet another aspect of the invention amplitudes are used to represent 
the magnitudes of the carriers. Preferably the magnitudes of the carriers and the 
predetermined magnitudes are absolute values. 

In a further aspect of the invention the correlation circuitry also has a peak tracking 
1 0 circuit for determining the spacing between a first peak and a second peak of the K sets 
of accumulated magnitudes, wherein the first peak is the maximum magnitude, and the 
second peak is the second highest magnitude. 

The channel estimation and correction circuitry also has an interpolating filter for 
estimating the channel response between the pilot carriers, and a multiplication circuit 
15 for multiplying data carriers output by the FFT processor with a correction coefficient 
produced by the interpolating filter. 

The channel estimation and correction circuitry also has a phase extraction circuit ; 
accepting a data stream of phase-uncorrected I and Q data from the FFT processor, 
and producing a signal representative of the phase angle of the uncorrected data. The 
20 phase extraction circuit includes an accumulator for the phase angles of succeeding 
phase-uncorrected I and Q data. 

According to an aspect of the invention the channel estimation and correction 
circuitry includes an automatic frequency control circuit coupled to the phase extraction 
circuit, in which a memory stores the accumulated common phase error of a first symbol 
25 carried in the phase-uncorrected i and Q data. An accumulator is coupled to the 
memory and accumulates differences between the common phase error of a plurality 
of pilot carriers in a second symbol and the common phase error of corresponding pilot 
carriers in the first symbol. The output of the accumulator is filtered, and coupled to the 
l/Q demodulator. 

30 According to another aspect of the invention the coupled output of the accumula- 

tor of the automatic frequency control circuit is enabled in the l/Q' demodulator only- 
during reception- of a guard interval therein. . 

According to yet another aspect of the invention the channel estimation and 
correction circuitry also has an automatic sampling rate control circuit coupled to the 

35 phase extraction circuit, in which a memory stores the individual accumulated phase 
errors of- pilot carriers in- a first symbol carried in the phase-uncorrected I and Q data. 
An accumulator is coupled to the memory and accumulates differences between the 
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phase errors of individual pilot carriers in a second symbol and phase errors of 
corresponding pilot carriers in the first symbol to define a plurality of accumulated 
intersymbol carrier phase error differentials. A phase slope is defined by a difference 
between a first accumulated intersymbol carrier phase differential and a second 
5 accumulated intersymbol carrier phase differential. The output of the accumulator is 
filtered and coupled to the l/Q demodulator. 

According to one aspect of the invention the sampling rate control circuit stores a 
plurality of accumulated intersymbol carrier phase error differentials and computes a line 
of best fit therebetween. 
10 According to another aspect of the invention the coupled output signal of the 

accumulator of the automatic sampling rate control circuit is enabled in the resampling 
circuit only during reception of a guard interval therein. 

According to an aspect of the invention a common memory for storing output of the 
phase extraction circuit is coupled to the automatic frequency control circuit and to the 
15 automatic sampling rate control circuit. 

According to another aspect of the invention the phase extraction circuit also has 
a pipelined circuit for iteratively computing the arctangent of an angle of rotation 
according to the series 

y 3 Y ^ Y ^ Y ^ 

20 tan" 1 (x) = x-— + — - — + — |x|<1 

3 5 7 9 

wherein x is a ratio of the phase-uncorrected I and Q data. 

The pipelined circuit includes a constant coefficient multiplier, and a multiplexerfor 
selecting one of a plurality of constant coefficients of the series. An output of the 

25 multiplexer is connected to an input of the constant coefficient multiplier. 

According to still another aspect of the invention the pipelined circuit has a 
multiplier, a first memory for storing the quantity x 2 t wherein the first memory is coupled 
to a first input of the multiplier, and has a second memory for holding an output of the 
multiplier. A feedback connection is provided between the second memory and a 

30 second input of the multiplier. The pipelined circuit also has a third memory for storing 
the value of the series. Under direction of a control circuit coupled to the third memory, 
the pipeline circuit computes N terms of the series, and also computes N+1 terms of the 
series. An averaging circuit is also coupled to the third memory and computes the 
average of N terms and N+1 terms of the series. 

35 Data transmitted in a pilot carrier of the multicarrier signal is BCH encoded 

according to a code generator polynomial h(x). A demodulator operative on the BCH 
encoded data is provided, which includes an iterative pipelined BGH decoding circuit. 
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The BCH decoding circuit is circuit coupled to the demodulator. It forms a Galois Field 
of the polynomial, and calculates a plurality of syndromes therewith. The BCH decoding 
circuit includes a plurality of storage registers, each storing a respective one of the 
syndromes, and a plurality of feedback shift registers, each accepting data from a 
5 respective one of the storage registers. The BCH decoding circuit has a plurality of 
Galois field multipliers. Each of the multipliers is connected in a feedback loop across 
a respective one of the feedback shift registers and multiplies the output of its 
associated feedback shift register by an alpha value of the Galois Field. An output 
Galois field multiplier multiplies the outputs of two of the feedback shift registers. 

10 A logical network forms an error detection circuit connected to the feedback shift 

registers and to the output Galois field multiplier. The output of the error detection circuit 
indicates an error in a current bit of data, and a feedback line is enabled by the error 
detection logic and connected to the storage registers. Using the feedback line : the data 
output by the feedback shift registers are written back into the storage registers for use 

15 in a second iteration. 

. According to an aspect of the invention the output Galois field multiplier has a first 
register initially storing a first multiplicand A, a constant coefficient multiplier connected 
to the first register for multiplication by a value a. An output of the constant coefficient 
multiplier is connected to the first register to define a first feedback loop, whereby in a 

20 kth cycle of clocked operation the first register contains a Galois field product Aa\ A 
second register is provided for storing a second multiplicand B. An AND gate is 
connected to the second register and to the output of the constant coefficient multiplier. 
An adder has a first input connected to an output of the AND gate. An accumulator is 
connected to a second input of the adder, and the Galois field product AB is output by 

25 the adder. 

The invention provides a method for the estimation of a frequency response of a 
channel. It is performed by receiving from a channel an analog multicarrier signal that 
has a plurality of data carriers and scattered pilot carriers. The scattered pilot carriers 
are spaced apart at an interval N and are transmitted at a power that differs from the 

30 transmitted power of the data carriers. The analog multicarrier signal is converted to a 
digital representation thereof.. A Fouriertransform is performed on the digital representa- 
tion of the multicarrier signal to generate a transformed digital signal. The bit order of 
the transformed digital signal is reversed to generate a bit-order reversed signal. 
Magnitudes of the carriers in the bit-order reversed signal are cyclically accumulated in 

35 N accumulators, amd the accumulated magnitudes are correlated with the power of the 
scattered pilot carriers. Responsive to , the correlation, a synchronizing signal is 
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generated that identifies a carrier position of the multicarrier signal, preferably an active 
carrier. 

According to another aspect of the invention the step of accumulating magnitudes 
is performed by adding absolute values of a real component of the bit-order reversed 
5 signal to respective absolute values of imaginary components thereof to generate sums, 
and respectively storing the sums in the N accumulators. 

According to yet another aspect of the invention the step of correlating the 
accumulated magnitudes also is performed by identifying a first accumulator having the 
highest of the N values stored therein, which represents a first carrier position, and by 
10 identifying a second accumulatorwhich has the second highest of the N values stored 
therein, which represents a second carrier position. The interval between the first carrier 
position and the second carrier position is then determined. 

To validate the consistency of the carrier position identification, the position of a 
carrier of a first symbol in the bit-order reversed signal is compared with a position of a 
15 corresponding carrier of a second symbol therein. 

Preferably interpolation is performed between pilot carriers to determine correction 
factors for respective intermediate data carriers disposed therebetween, and 
respectively adjusting magnitudes of the intermediate data carriers according to the 
correction factors. 

20 According to an aspect of the invention a mean phase difference is determined 

between corresponding pilot carriers of successive symbols of the transformed digital 
signal. A first control signal representing the mean phase difference, is provided to 
control the frequency of reception of the multicarrier signal. The first control signal is 
enabled only during reception of a guard interval. 
25 Preferably a line of best fit is determined for the inter-symbol phase differences of 

multiple carriers to define a phase slope. 

For a better understanding of these and other objects of the present invention, 
reference is made to the detailed description of the invention, by way of example, which 
is to be read in conjunction with the following drawings, wherein: 
30 Fig. 1 illustrates the spectrum of a COFDM subchannel; 

Fig. 2 shows a frequency spectrum for multiple carriers in*a COFDM signal; ' 
Fig. 3 is a diagram of a signal according to COFDM and shows a data symbol 
format; 

Fig. 4 is a block diagram illustrating an FFT based COFDM system; 
35 Fig. 5 illustrates certain perturbations in a COFDM signal constellation; 

Fig. 6 is a flow diagram of a method of timing synchronization according to a 
preferred embodiment of the invention; 
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Fig. 7 is a plot of an F ratio test performed on several data symbols for coarse 
timing synchronization; 

Fig. 8 is a plot of an incomplete beta function for different degrees of freedom; 

Fig. 9 is a plot helpful in understanding a test of statistical significance according 
5 to the invention; 

Fig. 10 is an electrical schematic of a synchronization circuit according to an 
alternate embodiment of the invention; 

Fig. 11 is an electrical schematic of a synchronization circuit according to another 
alternate embodiment of the invention; 
10 Fig. 12 is a block diagram of a single-chip embodiment of a digital receiver in 

accordance with the invention; 

Fig. 1 3 is a block diagram illustrating the front end of the digital receiver shown in 
Fig. 12 in further detail; 

Fig. 14 is a block diagram illustrating the FFT circuitry, channel estimation and 
15 correction circuitry of the digital receiver shown in Fig. 12; 

Fig. 1 5 is a block diagram illustrating another portion of the digital receiver shown 
in Fig. 12; 

Fig. 1 6 is a more detailed block diagram of the channel estimation and correction 
circuitry shown in Fig. 14; 
20 Fig. 17 is a schematic of the automatic gain control circuitry of the digital receiver 

shown in Fig. 12; 

Fig. 18 is a schematic of the l/Q demodulator of the digital receiver shown in Fig: 

12; 

Fig. 19 illustrates in greater detail a low pass filter shown in Fig. 13; 
25 Fig. 20 shows the response of the low pass filter shown in Fig. 19; 

Fig. 21 shows the resampling circuitry of the digital receiver shown in Fig. 12; 
Fig. 22 illustrates a portion of an interpolator in the resampling circuitry of Fig. 21; 
Fig. 23 is a more detailed block diagram of the FFT window circuitry shown in Fig. 

14; 

30 Fig. 24 is a schematic of a butterfly unit in the FFT calculation circuitry shown in 

Fig. 14; 

Figs. 25 and 26 are schematics of butterfly units in accordance with the prior art; 
Fig. 27 is a schematic of a radix 2 2 + 2 FFT processor in accordance with the 
invention; 

35 Fig. 28 is 32 point flow graph of the FFT processor shown in Fig. 27; 

Fig. 29 is a schematic of a configurable 2K/8K radix 2 2 +2 single path, delay 
feedback pipelined FFT processor in accordance. with the invention; - •/••■* 
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Fig. 30 is a detailed schematic of a complex multiplier used in the circuitry shown 
in Fig. 29; 

Fig. 31 is a detailed schematic of an alternate embodiment of a complex multipliers 
used in the circuitry shown in Fig. 29; 
5 Fig. 32 is another diagram illustrating the organization of the twiddle factors for 

each of the multipliers in the circuitry shown in Fig. 29; 

Fig. 33 illustrates the organization of the twiddle factors for each of the multipliers 
in the circuitry shown in Fig. 29; 

Fig. 34 is a schematic of address generator used in the circuitry shown in Fig. 29; 
10 Fig. 35 is a schematic of a generalization of the address generator shown in Fig. 

34; 

Fig. 36 is a flow chart illustrating the process of pilot location conducted by the 
channel estimation and correction circuitry shown in Fig. 16; 

Fig. 37 is a flow chart of an embodiment of the pilot localization procedure 
15 according to the invention. 

Fig. 38 is a more detailed block diagram of the tps sequence block of the circuitry 
shown in Fig. 14; 

Fig. 39 is a schematic of a BCH decoder used in the tps processing circuitry shown 
in Fig. 38; 

20 Fig. 40 is a more detailed schematic of a Galois field multiplier shown in Fig. 39; 

Fig. 41 is a block diagram generically illustrating the automatic sampling control 
and automatic frequency control loops of the digital receiver shown in Fig. 12; 

Fig. 42 is a more detailed block diagram of the automatic sampling control and 
automatic frequency control loops shown in Fig. 41 ; 
25 Fig. 43 is a more detailed block diagram of the phase extract block of the circuitry 

shown in Fig. 42; * 

Fig. 44 is a schematic of the circuitry employed to calculate an arctangent in the 
block diagram shown in Fig. 43; 

Fig. 45 is a plot of the square error at different values of a of the Taylor expansion 
30 to 32 terms; 

Fig. 46 is a plot of the square error at different values of a of the Taylor expansion 
to 31 terms; • 

Fig. 47 is a plot of the square error at different values of a of the average of the 
Taylor expansion to 31 and 32 terms; 
35 Fig. 48 is a plot of the phase differences of pilot carriers with a line of best fit 

shown; 
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Fig. 49 is a more detailed block diagram an alternate embodiment of the automatic 
sampling control and automatic frequency control loops shown in Fig. 41; 

Fig. 50 illustrates a coded constellation format used in the demapping circuitry of 
Fig. 15; 

5 Fig. 51 illustrates the conversion of l,Q data to binary data value using the format 

shown in Fig. 50; 

Fig. 52 is a more detailed block diagram of the symbol deinterleaving circuitry 
shown in Fig. 15; 

Fig. 53 is a more detailed block diagram of the bit deinterleaving circuitry shown 
10 in Fig. 15; 

Fig. 54 illustrates the conversion from a coded constellation format to a 24 bit soft 
l/Q format by the bit deinterleaving circuitry shown in Fig. 53; 

Fig. 55 is a more detailed block diagram of the microprocessor interface of the 
receiver shown in Fig. 12; 

15 Fig. 56 is a more detailed block diagram of the system controller of the receiver 

shown in Fig. 12; and 

Fig. 57 is a state diagram relating to channel acquisition in the system controller 
of the receiver shown in Fig. 56. 
Alignment of The FFT Window 

20 Referring again to Figs. 3 and 4. according to the invention a statistical method is 

applied to COFDM signals to find the end of the guard interval 10. This method is 
explained with reference to the above noted European Telecommunications Standard, ..> 
but is applicable to many forms of frequency division multiplexing having prefixed or 
postfixed guard intervals. It allows the receiver 32 to find the end of the guard interval 

25 given only the received sampled complex signal ( solid line 1 2) and the size of the active 
interval 6 . The method relies on the fact that the guard interval 10 is a copy of the last 
part of the data symbol 4. In the receiver 32, due to echoes and noise from the channel 
and errors in the local oscillator, the guard interval 10 and the last part of the data 
symbol 4 will differ. If the errors introduced are random then a statistical method can be 

30 - applied. According to the invention, the received complex signal is sampled at a rate 
which is nearly identical to that used in the transmitter. A difference signal is found for 
a pair of received samples which are separated by a period of time which is as close as 
possible to the active interval 6. This period should be equal to the size of the fast 
fourier transform ("FFT") being applied (i.e. 2048 or 8.192 samples). Let 



35 
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where S- t is the difference signal; § and §. msiZ e are the current and previous complex 
input samples of which the modulus is taken. That is, the subscript T indexes a linear 
time sequence of input values. Assuming that the input signal is random, then S, is also 
random. Within the guard interval Sj and Si_ ms j Ze will be similar, although not identical, due 
5 to the effects of the channel. S t will be therefore a random signal with a small dispersion. 
As used herein the term "dispersion" means generally the spread of values, and is not 
restricted to a particular mathematical definition. In general the active part of one symbol 
is not related to the active part of the next symbol. Outside of the guard interval S ] will 
be random with a much larger dispersion. In order to find the end of the guard interval, 

10 the dispersion of the difference signal Sj is monitored to look for a significant increase 
which will occur at the boundary of the guard interval 10 and the active interval 6. The 
inventors have also observed that a large decrease in dispersion is seen at the start of 
the guard interval 10. 

According to a preferred embodiment of the invention samples of the input signal 

1 5 are stored over an interval which includes at least one symbol period T s . The dispersion 
of the difference signal Sj is calculated over a block of samples. The block is moved 
back in time over a number of samples, n, and the dispersion is recalculated. These two 
blocks are referred to herein as "comparison blocks". The ratio of a current dispersion 
in a first comparison block to the dispersion in a previous comparison block is found. 

20 Then,- the F ratio significance test is used to find significant differences in the 
dispersions of the two comparison blocks. The F ratio is defined as 

F __VAR{0_ 

VAR(i-n) 1 ' 

25 where n is a positive integer, i indexes the input samples, and VAR(i) is the variance of 
a block of values of length N samples. Variance can be defined as 



1 N 1 ^ 

var(o--L £(s, w ) 2 - -£Si. 



(16) 



N j_ Q 

30 While the F ratio significance test is used in the preferred embodiment, other functions 
of the two dispersion values which give a signal relating to* the ch-ange in dispersion 
could be used. There are many such functions. An advantage of the F ratio .is that for 
a random input signal it has a known probability distribution, allowing convenient 
statistical analysis for purposes of performance analysis and system design. Also the 

35 F ratio intrinsically normalizes the signal, making the result independent of the signal 
level. 
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The method is disclosed with reference to Fig. 6 t in which a first member of a 
sample pair in a current evaluation block is measured at step 38. A delay of one active 
interval 6 ( Fig. 3) is experienced in step 40. This may be accomplished with a digital 
delay such as a FIFO, or equivaiently by buffering samples for an active interval in a 
5 memory and accessing appropriate cells of the memory. A second member of the 
sample pair is measured in step 42, and the difference between the first and second 
member is determined and stored in step 44. The end of the current block is tested at 
decision step 46. The size of the evaluation block should not exceed the length of a 
guard interval, and may be considerably smaller. In the event the end of the current 
10 block has not yet been reached, another sample is acquired at step 48 ; and control 
returns to step 38. 

If the end of the current block has been reached, the dispersion of the current 

block is measured in step 50, and is treated as one of two comparison blocks of data. 

A test is made at decision step 52 to determine if a group of two comparison blocks 
15 have been evaluated. If this test is negative, then another block of data is acquired in 

step 54 ? after which control returns to step 38. The other block of data need not be 

contiguous with the block just completed. 

In the event the test at decision step 52 is positive, the F ratio is computed for the 

group of two comparison blocks at step 56. The results obtained in step 56 are 
20 submitted to peak detection in step 60. Peak detection optionally includes statistical 

tests of significance, as is explained hereinbelow. 

If peaks are detected, then the boundary of a guard interval is established in step 

62 for purposes of synchronization of the FFT window which is necessary for further 

signal reconstruction. If peaks are not detected, the above process is repeated with a 
25 block of samples taken from another portion of the data stream. 

Example 1: 

Referring now to Fig. 7 a complex signal was generated according to the above 
noted European Telecommunications standard using a random number generator, and 
transmitted across a Ricean channel model together with added white Gaussian noise 

30 (SNR = 3.7). Data symbols were then analyzed according to the above described 
method. The results 6 data symbols are shown in Fig. 7. wherein the F ratio is plotted 
for convenience of presentation on a logarithmic axis as line 64, because the spikes 66, 
68, at the beginning and end of the guard intervals respectively, are very large. 

Although it is quite evident from Figure 7 that the ends of the guard intervals are 

35 easy to find using any of several well known peak detectors, it is possible to apply a 
statistical test to more accurately answer the question: do the two blocks of samples 
have the same dispersion? This is the null hypothesis. H 0 . i.e. the dispersion is the 
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same and the observed spike in F is due to random fluctuations only. If H 0 has very low 
probability it can be rejected, which would correspond to detection of the start or end of 
the guard interval. From the way the COFDM symbol is constructed H 0 is expected to 
be true for comparison blocks lying entirely within the guard interval or within the active 
interval, but false when the comparison blocks straddle a boundary at the start or end 
of the guard interval. If comparison blocks of random samples are drawn from the same 
population then the probability of F is given by 

0(F\v^v 2 ) — ! ( — , — ) (17) 
2 2 

where l() is the incomplete Beta function, 

v 2 

x = 2 — (18) 

v 2 * Vl F 

15 and v 1 and v 0 are the number of degrees of freedom with which the first and second 
dispersions are estimated. In this example v1 = v2 = (N-1 ) if n >= N. The shape of the 
function is shown in Fig. 8. From a statistical point of view n should be sufficiently large 
so that the two blocks do not overlap, i.e. n >= N. If the blocks do overlap, then the 
calculation of the second dispersion will use samples used for the calculation of the first 

20 dispersion. This effectively reduces the number of degrees of freedom and hence the 
significance of the result. It has been determined that setting n=N works well. 

The function Q() in equation (13) actually gives the one-tailed probability. H c could 
be rejected if F is either very large or very small, and so the two-tailed test is required. 
Actually the two tails are identical, so for a two-tailed test the probability is double that 

25 given in equation (13). However, this results in values of probability greater than one for 
F<1 . The probability, p, is therefore calculated as follows: 

V. V. 

p=2/„(-A^) (19) 
2 2 

30 and then, if (p > 1), p = 2 - p. This probability reflects the viability of H 0 . Thus if p is 
small H 0 can be rejected and it can be stated, with a specified degree of certainty, that 
the comparison blocks come from sample populations with different dispersion. The 
noted European Telecommunications Standard specification states that the block size, 
N. should be 32 for a correlation algorithm. N={32.64} have been successfully tried. The 

35 probability functions obtained are shown in Fig. 9 using these values for N. In the 
preferred embodiment p <= 0.05 has been set for the rejection of H 0 . 
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A precise implementation would be to calculate F. then x. then the incomplete Beta 
function, then p and then apply the threshold test. This algorithm would be very difficult 
to realize in hardware since the Beta function is very complicated. In the preferred 
embodiment it is much simpler, and gives the same results, to set the acceptance 
threshold and N parameter, and thus define an upper and lower limit for F. It is then only 
necessary to calculate F and compare it with the limits. In order to simply find the end 
of the guard interval it may be safely assumed that F>1. Only the upper limit on F is 
needed. To calculate the limits on F accurately, a suitable root-finding method, such as 
Newton-Raphson may be utilized. Typical values are given in Table 1. 

Table 1 



p threshold 


v1 = v2 = 31 


v1 = v2 = 63 


F_lower 


F_upper 


F lower 


F_upper 


0.2 


0.627419 


1.593832 


0.722591 


1.383909 


0.1 


0.548808 


1.822132 


0.658620 


1.518326 


0.05 


0.488143 


2.048582 


0.607525 


1.646022 


0.01 


0.386894 


2.584689 


0.518205 


1.929738 


0.005 


0.354055 


2.824422 


0.487936 


2.049448 


0.001 


0.293234 


3.410251 


0.429794 


2.326695 


10" 4 




4.337235 






10" 5 




5.393528 






10" 6 




6.605896 






10' 7 




8.002969 






10" 8 




9.616664 







15 



20 



25 This method has been successfully tested using the specified channel model with 

additive white Gaussian noise (SNR=3.7). 

The formula for dispersion given in Equation (12) would require a multiplier for 
implementation in silicon. The calculation of F is a division in which the (N-1) 
normalisation constants cancel out as long as the two blocks have the same size: 

30 Accurate multiplication and division can be expensive in silicon.. In the preferred 
embodiment simplifications have been implemented which give less accurate, but still 
viable, values for F. Sj can be assumed to have zero mean so it is not necessary to 
calculate the mean from the block of samples. This also increases the number of 
degrees of freedom from (N-1 ) to N. Instead of calculating variance using the standard 
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sum of squares formula, the dispersion can be estimated by the mean absolute 
deviation. The formula for VAR(i) becomes 



VAR(i) = — 
N 



N -1 



E is,.,i 



(20) 



10 



The (1/N) factor divides out in the calculation of F if the two blocks have the same size. 
But there still remains the division of the two dispersions and the squaring required. 
These can be tackled using logarithms to the base 2. Substituting from Equation (16) 
into Equation (11) gives 



15 



F- 



E is„i 

N - 1 

E |S ' n 'I 

i -n -j 



\ 2 



(21) 



Taking logs to the base 2 gives 



20 



25 



30 



35 



logF - 2(logs -logsj - y 



(22) 



It is then only necessary to calculate y and compare it with the logarithm to the base 2 
of the F upper limit. The comparison can be made by subtracting the log of the limit from 
2(log2sa-log2sb) and comparing with zero. The factor of 2 can be absorbed into the 
limit. 

Calculation of the logs to base two is relatively straightforward in hardware if the 
numbers are stored as fixed point fractions. The fractions can be split into an exponent 
and a fractional mantissa: x = A2 B . Taking log base 2 gives logx = logA + B. Since A is 
fractional it is practical to find its logarithm using a lookup table. The exponent B can be 
found from the position of the MSB (since s a and s b will both be positive numbers). 

The calculation can thus be reduced to require only addition and subtraction 
arithmetic operations. The limit should also be recalculated using v1=v2=N if using this 
method. In practice, the significance level may be set empirically for a particular 
application, preferably p = 0.05. 

It will be appreciated by those skilled in the art that various measures of dispersion 
may be utilized without departing from the spirit of the invention, for example the 
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standard deviation, skew, various moments, histograms, and other calculations known 
in the art. 

In a first alternate embodiment of the invention, the above described method is 
employed using either the real or the imaginary parts of the signal instead of the 
modulus. This embodiment achieves economy in hardware. 

In a second alternate embodiment of the invention, the n parameter of equation 
(1 1 ) has been optimized. At the end of the guard interval, the two blocks straddle more 
of the transition to the active interval, giving a well-defined increase in the dispersion. 
Using any value n>2 has the drawback that several successive points will give 
significant increases as the later block travels up to the boundary. This small problem 
is easily overcome by introducing a dead period after detection of the boundary. That 
is, once a spike has been detected a set of samples equal to the size of the FFT window 
is accepted before further attempts are made to locate another spike. The dead period 
has the added benefit of not introducing false spikes. When using larger values of n the 
spikes 66, 68 ( Fig. 7) increase, whilst the H 0 noisy F signal remain much the same. 
Example 2: 

The maximum F-spike height as a function of n has been measured systematically 
together with the background variation in F. The results are shown in Table 2. 



20 



Table 2 



(1) 


(2) 


(3) 


(4) 


(5) 


n 


<F> 






(4) / (3) 


3 


1.0009 


0.07 


7.5 


107 


5 


1.0012 


0.10 


10.7 


107 


10 


1.0011 


0.14 


12.9 


92 


15 


1.0014 


0.17 


16.7 


98 


20 


1.0014 


0.19 


19.3 


102 


30 


1.0012 


0.23 


20.9 


91 


40 


0.9975 


0.24 


22.0 


92 


50 


0.9926 


0.25 


20.4 


81.6 ■ 



25 



30 



35 



Table 2 was developed using the first 5 frames of the signal analyzed in Fig. 7. 
The statistics in columns (2) and (3) of Table 2 were made by excluding any points 
where F>=3.0 to exclude spikes from the calculations. The spikes would otherwise affect 
the values of mean and standard deviation even though they are from a different 
statistical population. 
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The results indicate that the background variation in F, F s d . , was affected by n, 
increasing asymptotically to a value of approximately 0.28. It is likely that this is the 
effect of overlapping blocks. For example, for N=64 and n<64, the blocks over which the 
dispersions are calculated will contain some of the same values and therefore be 
correlated. To test this theory Fs.d. was evaluated for n>N, and the results are shown 
in Table 3. 

Table 3 



n 


F CH . 


60 


0.258 


70 


0.266 


80 


0.270 


90 


0.278 


100 


0.285 


128 


0.297 


256 


0.366 



10 



15 



20 



25 



30 



35 



The dependence becomes linear at n >= N/2. If F is calculated every n samples, 
rather than every sample, then this dependence may be reduced. However, this creates 
a risk for small guard intervals of not having the first block wholly within the guard 
interval and the second wholly within the active interval. 

A third alternateembodimentof the invention is disclosed with reference to Fig. 10, 
which schematically illustrates a timing synchronization circuit 70. The circuit accepts 
a complex input signal 72, and includes a circuit module 74 which develops the modulus 
of its input, which is taken from node 83. The circuit module 74 insures that the value 
being subsequently processed is an unsigned number. The input to the circuit module 
74 is a difference signal which is developed by a subtracter 75 which takes as inputs the 
input signal 72 and a delayed version of the input signal 72 which has been processed 
through a delay circuit 79, preferably realized as a FIFO 77 of length L, where L is the 
size of the FFT window. As explained above, it is also possible to operate this circuit 
where the input signal 72 is real, imaginary, or complex, or even the* modulus of a 
complex number. In the case where the input signal 72 is real, or imaginary, the circuit 
module 74 can be modified, and can be any known circuit that removes the sign of the 
output of the subtracter 75, or equivalently sets the sign so that the outputs accumulate 
monotonicaliy; i.e. the circuit has a unipolar output. The output of the circuit module 74 
is ultimately clocked into a digital delay, which is preferably implemented as a FIFO 78. 
When the FIFO 78 is full, a signal SIG1 80 is asserted, and the output of the FIFO 78 
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becomes available, as indicated by the AND gate 82. An adder/subtracter circuit 84 is 
also connected to the node 76, and its output is stored in a register 86. A delayed 
version of the output of the adder/subtractercircuit 84 is taken from the register 86 and 
fed back as a second input to the adder/subtractercircuit 84 on line 88. In the event the 
5 signal SIG1 80 has been asserted, a version of the output of the circuit module 74. 
delayed by a first predetermined interval N. where N is the number of samples in the 
comparison blocks, is subtracted from the signal on node 76. 

The signal on line 88 is an index into a lookup table, preferably implemented as 
a read-only-memory ("ROM"), and shown as ROM 90. The address of the ROM 90 
10 contains the logarithm to the base 2 of the magnitude of the signal on line 88, which 
then appears at node 92. The node 92 is connected to a subtracter 94, and to a delay 
circuit, shown as FIFO 98, which is used to develop the denominator of the middle term 
of equation (17). 

The subtracter 94 produces a signal which is compared against the log 2 of a 

15 predetermined threshold value F UMIT in a comparison circuit 106, shown for simplicity 
as an adder 108 connected to a comparator 110. The output signal SYNC 112 is 
asserted when the boundary of a guard interval has been located. 

' Although not implemented in the presently preferred embodiment, It is also 
possible to configure the size of the FIFO 77 dynamically, so that the size of the interval 

20 being evaluated can be adjusted according to operating conditions. This may 
conveniently be done by storing the values on the node 92 in a RAM 1 14 for computa- 
tion of their dispersion. 

In a fourth alternate embodiment of the invention, explained with reference to Fig. 
11, components similar to those of the embodiment shown in Fig. 10 have the same 

25 reference numerals. A timing synchronization circuit 116 is similar to the timing 
synchronization circuit 70, except now the delay circuit 79 is realized as the FIFO 77. 
and another FIFO 100, one of which is selected by a multiplexer 102. Both of the FIFOs 
77, 100 provide the same delay; however the capacities of the two are different. The 
FIFO 100 provides for storage of samples taken in an interval equal to the size of the 

30 FFT window, and is normally selected in a first mode of operation, for example during 
channel acquisition, when it is necessary to evaluate an entire symbol in order to locate 
a boundary of a guard interval. In the noted European Telecommunications standard, 
up to 8K of data storage is required, with commensurate resource requirements. During 
subsequent operation., the approximate location of the guard interval boundaries will be 

35 known from the history of the previous symbols. In a second mode of operation. It is 
therefore only necessary to evaluate a much smaller interval in order to verify the exact 
location of the guard interval boundary. The number of samples used in the computation 
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of the dispersion can be kept to a small number, preferably 32 or 64, and the much 
smaller FIFO 77 accordingly selected to hold the computed values. The resources 
saved thereby can be utilized for other functions in the demodulator, and memory 
utilized by the larger FIFO 100 may also be reallocated for other purposes. 
5 A control block 81 optionally advances the evaluation interval relative to symbol 

boundaries in the data stream in successive symbols, and can also be used to delay for 
the dead period. Eventually the moving evaluation interval straddles the boundary of the 
current symbol's guard interval, and synchronization is then determined. The size of the 
evaluation interval is chosen to minimize the use of memory, yet to be large enough to 
10 achieve statistical significance in the evaluation interval. The size of the evaluation 
interval, and the FIFO 77 may be statically or dynamically configured. 
Single Chip Implementation of a COFDM Demodulator 
Overview 

Referring initially to Fig. 12, there is shown a high level block diagram of a 

15 multicarrier digital receiver 126 in accordance with the invention. The embodiment 
described hereinbelow conforms to the ETS 300 744 telecommunications standard (2K 
mode), but can be adapted by those skilled in the art to operate with other standards 
without departing from the spirit of the invention. A radio frequency signal is received 
from a channel such as an antenna 128. into a tuner 130. which is conventional, and 

20 preferably has first and second intermediate frequency amplifiers. The output of the 
second intermediate frequency amplifier (not shown), is conducted on line 132 to an 
analog to digital converter 134. The digitized output of the analog to digital converter 
134 is provided to block 136 in which l/Q demodulation, FFT, channel estimation and 
correction, inner and outer deinterleaving, and forward error correction are conducted. 

25 Carrier and timing recovery are performed in block 136 entirely in the digital domain, and 
the only feedback to the tuner 130 is the automatic gain control ("AGC") signal which 
is provided on line 138. A steady 20 MHz clock on line 140 is provided for use as a 
sampling clock for the external analog to digital converter 134. A host microprocessor 
interface 142 can be either parallel or serial. The system has been arranged to operate 

30 with a minimum of host processor support. In particular channel acquisition can be 
achieved without any host processor intervention. * . . 

The functions performed within the block 136 are grouped for convenience of 
presentation into a front end (Fig. 13), FFT and channel correction group (Fig. 14) ; and 
a back end (Fig. 15). 

35 As shown in Fig. 13, l/Q samples at are received by an IQ demodulator 144 from 

the analog to digital'converter 134 (Fig. 12) on a bus 146 at a rate of 20 megasamples 
per second. An AGC circuit 148 also takes its input from the bus 146. A frequency rate 
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control loop is implemented using a numerically controlled oscillator 150, which receives 
frequency error signals on line 1 52, and frequency error update information on line 1 54. 
Frequency and sampling rate control are achieved in the frequency domain, based on 
the pilot carrier information. The frequency error signals, which are derived from the pilot 
5 carriers, and the frequency error update information will both be disclosed in further 
detail shortly. The I and Q data output from the IQ demodulator 144 are both passed 
through identical low pass filters 156, decimated to 10 megasamples per second, and 
provided to a sine interpolator 158. Sample rate control is achieved using a numerically 
controlled oscillator 1 60 which receives sample rate control information derived from the 
10 pilot signals on line 162, and receives sample error update timing information on line 



As shown in Fig. 14, acquisition and control of the FFT window are performed in 
block 166, which receives signals from the sine interpolator 158 (Fig. 13). The FFT 
computations are performed in FFT calculation circuitry 168. Channel estimation and 

15 correction are performed in channel estimation and correction block 170, and involves 
localization of the pilot carriers, as will be described below in greater detail. The tps 
information obtained during pilot localization is processed in tps sequence extract block 
172. Uncorrected pilot carriers are provided by the circuitry of channel estimation and 
correction block 1 70 to correction circuitry 1 74, which develops sampling rate error and 

20 frequency error signals that are fed back to the numerically controlled oscillators 1 50. 
160 (Fig. 13). 

Referring to Fig. 15, corrected I and Q data output from channel estimation and 
correction block 170 are provided to demapping circuitry 176. The current constellation 
and hierarchical constellation parameters, derived from the tps data, are also input on 

25 lines 178. 180. The resulting symbols are deinterleaved in symbol deinterleaver 182. 
utilizing a 1512 x 13 memory store. One bit of each ceil in the memory store is used .to 
flag carriers having insufficient signal strength for reliable channel correction. Bit 
deinterleaver 184 then provides deinterleaved I and Q data to a Viterbi Decoder 186. 
which discards the flagged carriers, so that unreliable carriers do not influence traceback 

30 metrics. A Forney deinterleaver 1 88 accepts the output of the Viterbi Decoder 1 86 and 
is coupled to a Reed-Solomon decoder 190. The forward error correction- provided by' 
the Viterbi and Reed-Solomon decoders is relied upon to recover lost da.ta in the case 
of flagged carriers. 



35 calculated in block 192 for uncorrected carriers with reference to the previous symbol. 
Data carriers whose interpolated channel response falls below some fraction, preferably 
0.2, of this mean will be marked with a bad_carrier flag 194. The bad_carrier flag 194 



164. 



Referring to Fig. 16, in the presently preferred embodiment a mean value is 
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is carried through the demapping circuitry 176, symbol deinterleaver 182, and bit 
deinterleaver 184, to the Viterbi Decoder 186 where it is used to discard data relating 
to the unreliable carriers. The parameters used to set the bad_carrier flag 194 can be 
varied by the rr^icroprocessor interface 142. 
5 An output interface 196 produces an output which can be an MPEG-2 transport 

stream. The symbol deinterleaver 182, and the bit deinterleaver 184 are conventional. 
The Viterbi decoder 186, Forney deinterleaver 188, Reed-Solomon decoder 190, and 
the output interface 196 are conventional. They can be the components disclosed in 
copending Application No. 638.273. entitled "An Error Detection and Correction System 

10 for a Stream of Encoded Data", filed April 26, 1996, Application No. 480,976, entitled 
"Signal Processing System", filed June 7, 1995, and Application No. 481.107, entitled 
"Signal Processing Apparatus and Method", filed June 7, 1995, all of which are 
commonly assigned herewith, and are incorporated herein by reference. The operation 
of the multicarrierdigital receiver 126 (Fig. 12) is controlled by a system controller 198. 

1 5 Optionally the hierarchical constellation parameters can be programmed to speed 

up channel acquisition, rather than derived from the tps data. 

The input and output signals and the register map of the multicarrier digital 
receiver 126 are described in tables 4, and 5 respectively. 
Automatic Gain Control 

20 The purpose of the AGC circuit 148 (Fig. 1 3)is to.generate a control signal to van/ 

the gain of the COFDM input signal to the device before it is analog-to-digitalconverted. 
As shown in greater detail in Fig. 17. a Sigma-Delta modulator 200 is used to provide 
a signal which can be used as a gain control to a tuner, once it has been low-pass 
filtered by an external R-C network. 

25 The magnitude of the control voltage signal 202 is given by: 

control_voltage - control_voltage - error (23) 

where 

error - K(|data| - mean) (24) 

30 where K is a constant (normally K«1) which determines the gain in the AGC control 
loop. The mean value can be determined from the statistics of Gaussian noiser'which 
is a close approximation to the properties of the COFDM input signal, where the input 
data is scaled to . The control voltage signal 202 is set back to its initial value when 
the signal resync 204 is set low. indicating a channel change or some other event 

35 requiring resynchronization. 

The input and output signals and the registers for the microprocessorinterface 142 
of the AGC circuit 148 are described in tables 6. 7. and 8 respectively. 
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IQ Demodulator 

The function of the IQ demodulator 144 (Fig. 13) is to recover in-phase and 
quadrature components of the received sampled data. It is shown in further detail in Fig. 
18. 

5 The numerically controlled oscillator 150 generates in-phase and quadrature 

sinusoids at a rate of (32/7) MHz, which are multiplied with data samples in multipliers 
206. The address generator 208 advances the phase linearly. The frequency error input 
210 increments or decrements the phase advance value. The samples are multiplied 
with the sinusoids in the multipliers 206using 1 0 bit x 10 bit multiply operations. In one 

10 embodiment the IQ demodulator 144 is operated at 20 MHZ and then retimed to40MHz 
in retiming block 212. In a preferred embodiment the IQ demodulator 144 is operated 
at 40MHz, in which case the retiming block 212 is omitted. 

Sinusoids are generated by the address generator 208 on lines 214, 216. The 
phase value is employed as an address into a lookup tabie ROM 218. Only quarter 

15 cycles are stored in the lookup table ROM 218 to save area. Full cycles can be 
generated from the stored quarter cycles by manipulating the data from the ROM 218 
and inverting the data in the case of negative cycles. Two values are read from the 
lookup table ROM 218 for every input sample a cosine and a sine, which differ in 
phase by 90 degrees. 

20 The input and output signals of the IQ demodulator 144 are described in tables 9 

and 10 respectively. 
Low Pass Filter 

The purpose of the low pass filters 156 (Fig. 13) is to remove aliased frequencies 
after IQ demodulation - frequencies above the 32/7 MHz second IF are suppressed by 

25 40dB. I and Q data are filtered separately. The output data is decimated to 10 
megasamples per second ("Msps") because the filter removes any frequencies above 
1/4 of the original 20 Msps sampling rate. The filter is constructed with approximately 
60 taps which are symmetrical about the center, allowing the filter structure to be 
optimized to reduce the number of multipliers 220. Fig. 19 is a block diagram of one of 

30 the low pass filters 156 : the other being identical. Fig. 19 shows a representative 
symmetrical tap 222, and a center tap 224. The required filter response pf the low pass 
filters 156 is shown in Fig. 20. 

The input and output signals of the low pass filters 1 56 are described in tables 1 1 
and 12 respectively. 

35 Resampling 

Referring to Fig. 13. the purpose of resampling is to reduce the 10 Msps data 
stream output from the iow pass filters 156 down to a rate of (64/7) Msps. which is the 
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nominal sample rate of the terrestrial digital video broadcasting ("DVB-T") modulator at 
the transmitter. 

Resampling is accomplished in the sine interpolator 158, and the numerically 
controlled oscillator 160. The latter generates a nominal 64/7 MHZ signal. The 
5 resampling circuitry is shown in further detail in Fig. 21. The numerically controlled 
oscillator 160 generates a valid pulse on line 226 and a signal 228 representing the 
interpolation distance for each 40MHz clock cycle in which a 64/7MHz sample should 
be produced. The interpolation distance is used to select the appropriate set of 
interpolating filter coefficients which are stored in coefficient ROMs 230. It should be 
10 noted that only the sine interpolator for I data is illustrated in Fig. 21 . The structures for 
Q data are identical 

Fig. 22 illustrates the generation of the interpolation distance and the valid pulse. 
Nominally T s •'= 1/10 Msps, and T = 1/ (64/7) Msps. The sine interpolation circuit 
disclosed in our noted Application No. 08/638,273 is suitable, with appropriate 
1 5 adjustment of the operating frequencies. 

The input and output signals of the sine interpolator 158 and the numerically 
controlled oscillator 160 are described in tables 13 and 14 respectively. 
FFT Window 



20 is to locate the "active interval" of the COFDM symbol, as distinct from the "guard 
interval". This function is referred to herein for convenience as "FFT Window". In this 
embodiment the active interval contains the time domain representation of the 2048 
carriers which will be recovered by the FFT itself. 



25 mode the entire incoming sample stream is searched for the guard interval/active 
interval boundary. This is indicated when the F-ratio reaches a peak, as discussed 
above. Once this boundary has been located, window timing is triggered and the 
incoming sample stream is searched again for the next guard interval/active interval 
boundary. When this has been located the length of the guard interval is known and the 

30 expected position of the next guard/active boundary can be predicted. The FFT window 
function then switches to tracking mode. 

This embodiment is similar to the fourth alternate embodiment discussed above 
in respect of the tracking mode. In tracking mode only a small section of the incoming 
sample stream around the point where the guard/active boundary is expected to be is 

35 searched. The position of the active interval drifts slightly in response to IF frequency 
and sampling rate offsets in the front-end before the FFT is calculated. This drift is 



As has been explained in detail above, the function of the FFT Window function 



The FFT window operates in two modes; Acquisition and Tracking. In Acquisition 
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tracked and FFT window timing corrected, the corrections being inserted only during the 
guard interval- 
It will be appreciated by those skilled in the art that in a practical single chip 
implementation as is disclosed herein, memory is an expensive resource in terms of 
5 chip area, and therefore must be minimized. Referring to Fig. 23, during Acquisition 
mode the FFT calculation process is not active so hardware can be shared between the 
FFT Window and the FFT calculation, most notably a 1024x22 RAM 232 used as a 
FIFO by the FFT Window, and selected for receipt of FFT data on line 234 by a 
multiplexer 236. Once in Tracking mode the FFT calculation process is active so that 

10 other control loops to recover sampling rate and frequency which depend on FFT data 
(e.g. pilots in the COFDM symbol) can initialize. Therefore tracking mode requires a 
dedicated tracking FIFO 238, which is selected by a multiplexer 240. 

The input and output signals, and signals relating to the microprocessor interface 
142 of the FFT Window circuitry shown in Fig. 23 are described in tables 15, 16,. and 17 

15 respectively. 

In one embodiment a threshold level, set from statistical considerations, is applied 
to the F-ratio signal (see Fig. 7) to detect the negative and positive spikes which occur 
at the start and end of the guard interval respectively. The distance between the spikes 
is used to estimate the guard interval size. Repeated detection of the positive spikes is 
20 used to confirm correct synchronization. However with this method under noisy - 
conditions the F-ratio signal becomes noisy and the spikes are not always reliably . 
detectable. 

In another embodiment peak detection is used to find the spikes in the F-ratios. 
It has been found that a fixed threshold is reliable only at or exceeding about a carrier- 
25 to-noise ("C/N") ratio of 12 dB. Peak detection is generally more sensitive and more 
specific, with generally reliable operation generally at 6 - 7 dB. The maxima should 
occur at the end of the guard interval. The difference in time between the two maxima 
is checked against the possible guard interval sizes. With an allowance for noise, the 
difference in time indicates the most likely guard interval size and the maxima 
30 themselves provide a good indication of the start of the active part of the symbol. 

Preferably this process is iterated for several symbols to confirm detection, and is 
expected to improve performance when the C/N ratio is low. 

The data stream is passed to accumulators 242, 244, each holding 64 moduli. 
Conversion to logarithms and subtraction of the logarithms is performed in block 246. 
35 The peaks are detected in peak detector block 248. Averaging of the symbol peaks is 
performed in block 250. 
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In noisy conditions, the maxima may be due to noise giving possibly inaccurate 
indications of the guard interval length and the start of the active symbol. The general 
strategy to cope with this is to perform a limited number of retries. 

Currently, calculation of the F-ratio is done "on the fly" i.e. only once at each point. 
The variance estimates are calculated from 64 values only. Under noisy conditions, the 
variance estimates become very noisy and the spikes can become obscured, in an 
optional variation this problem is solved by obtaining more values for the variance 
estimate, by storing the variance estimate during acquisition for each of the possible 
T+G max points in the storage block 256. The variance estimates themselves may be 
formed by accumulating variances for each point, and then filtering in time over a 
number of symbols. A moving average filter or an infinite impulse response ("IIR") filter 
is suitable. A moving run of symbols, preferably between 16 and 32 t are integrated in 
block 252, which increases the reliability of peak detection under noisy conditions. The 
storage block 256 holding the integrated F-ratio values is searched to find the maximum 
value. This is of length T+G max . where G max is the maximum guard interval size, T/4. 
Preferably the memory for storage block 256 is dynamically allocated, depending on 
whether acquisition mode or tracking mode is operative. Any unused memory is 
released to other processes. Similarly in tracking mode the integrated data stream is 
stored in tracking integration buffer 254. 

This method has been tested with up to 4 symbols, without an IIR filter, and it has 
been found that the spikes can be recovered. However this approach does require 
increased memory. 
FFT Processor 

The discrete Fourier transform ("DFT") has the well known formula 

1 11 

X (k) =- Y\x(n)W nk k = 0,1 N-1 (25) 

L n -0 

where N = the number of points in the DFT; 

x(k) = the kth output in the frequency domain; 
x(n) = the nth input in the time domain 



and 



w nk = e - i(2 nnk/L) (2 6) 



W is also known as a "twiddle factor". 

For N > 1000 the DFT imposes a heavy computational burden and becomes 
impractical, instead the continuous Fourier transform is used, given by 
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x(t) = f x(t)e ia,, dt (27) 

5 The continuous Fourier transform, when computed according to the well known FFT 
algorithm, breaks the original N-point sequence into two shorter sequences. In the 
present invention the FFT is implemented using the basic butterfly unit 258 as shown 
in Fig. 24. The outputs C and D represent equations of the form C = A + B, and D = (A - 
BJW*. The butterfly unit 258 exploits the fact that the powers of W are really just 

10 complex additions or subtractions. 

A real-time FFT processor, realized as the FFT calculation circuitry 168 (Fig. 14) 
is a key component in the implementation of the multicarrier digital receiver 126 (Fig. 
12). Known 8K pipeline FFT chips have been implemented with 1.5M transistors, 
requiring an area of 100 mnrr in 0.5|j technology, based on the architecture of Bi and 

15 Jones. Even using a memory implementation with 3-transistor digital delay line 
techniques, over 1M transistors are needed. This has been further reduced with 
alternative architecture to 0.6M, as reported in the document A New Approach to 
Pipeline FFT Processor. Shousheng He and Mats Torkelson, Teracom Svensk 
RundRadio. DTTV-SA 180, TM 1547. This document proposes a hardware-oriented 

20 radix-2 2 algorithm, having radix-4 multiplicative complexity. However the requirements 
of the FFT computation in the present invention require the implementation of a radix 
2 2 +2 FFT processor. 

Referring to Fig. 25 and Fig. 26 the butterfly structures BF2I 260 and BF2II 262. 
known from the noted Torkelson publication, are shown. The butterfly structure BF2II 

25 262 differs from the butterfly structure BF2I 260 in that it has logic 264 and has a 
crossover 266 for crossing the real and imaginary inputs to facilitate multiplication by -j. 

Fig. 27 illustrates the retimed architecture of a radix 2 2 + 2 FFT processor 268 in 
accordance with the invention which is fully pipelined, and comprises a plurality of 
stages, stage-0 270 through stage-6 272. Except for stage-0 270, the stages each 

30 comprise one butterfly structure BF2I 260 and one butterfly structure BF2II 262. and 
storage RAMS 274. 276 associated therewith. *stage-0 270 only has a single butterfly 
structure BF2I 260. This architecture performs a straight-forward 32-paint FFT. stage-6 
272 has control logic associated therewith, including demultiplexer 278 and multiplexer 
280, allowing stage-6 272 to be bypassed, thus providing a 2K implementation of the 

35 FFT. Counters 282 configure the butterfly structures BF2I 260 and BF2II 262 to select 
one of the two possible diagonal computations, during which data is being simulta- 
neously written to and read from the storage RAMS 274. 276. 
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Fig. 28 illustrates a 32 point flow graph of the FFT processor 268 using radix 2 2 +2 
pipeline architecture. Computations are performed using eight 4-point FFTs and four 8- 
point FFTs. These are decomposed in turn into two 4-point FFTs and four 2-point FFTs. 
Fig. 29 illustrates the retimed architecture of a configurable 2K/8K radix 2 2 +2 
5 single path, delay feedback pipelined FFT processor 284, in which like elements in Fig. 
27 are given the same reference numerals. The stages have a plurality of pipeline 
registers 286 which are required for proper timing of the butterfly structures BF2I 260 
and BF2II 262 in the various stages. As can be seen, the addition of each pipelined 
stage multiplies the range of the FFT by a factor of 4. There are 6 complex multipliers 

10 288, 290, 292, 294, 296, 298 which operate in parallel. This processor computes one 
pair of l/Q data points every four fast clock cycles, which is equivalent to the sample rate 
clock. Using 0.35|jm technology the worst case throughput is 140|js for the 2K mode of 
operation, and SSOpsforthe 8K mode, exceeding the requirements of the ETS 300 744 
telecommunicationsstandard. Data enters the pipeline from the left side of Fig. 29, and 

15 emerges on the right. The intermediate storage requirements are 2K/8K for I data and 
2K/8K for Q data, and is mode dependent. In practice the radix-4 stage is implemented 
as a cascade of two adapted radix-2 stages that exploit the radix-4 algorithms to reduce 
the number of required complex multipliers. 

Fig. 30 is a schematic of one embodiment of the multipliers 288, 290, 292, 294, 

20 296, 298 for performing the complex multiplication C = A x B, where A is data, and B is 
a coefficient. Because the FFT processor 284 has 6 complex multipliers, each requiring 
3 hardware multipliers 300, a total of 18 hardware multipliers 300 would be required. It 
is preferable to use the embodimentof Fig. 31 in which some of the hardware multipliers 
300 are replaced by multiplexers 302, 304. 

25 Turning again to Fig. 29 there are a plurality of RAMS 306, 308, 310, 312, 314. 

316 which are preferably realized as ROMs and contain lookup tables containing 
complex coefficients comprising cosines for the multipliers 288, 290, 292, 294, 296, 298 
respectively. It has been discovered that by addressing the RAMS 306, 308. 310, 312, 
314, 316 according to a particular addressing scheme, the size of these RAMS can be 

30 markedly reduced . The tradeoff between the complexity of the addressing circuitry and 
the reduction in RAM size becomes favorable beginning at stage-3 318. Referring again 
to Fig. 28 there are two columns 320, 322. Column 320 holds values W 2 - W 14 , followed 
by W 1 - W 7 , and then W 3 - W 21 . These coefficients are stored in the RAM 308, required 
by the particular multiplier 290. Column 322 contains values W 8 , W 4 , W 12 . which repeat 

35 3 times. Note further that between the values W 8 , W 4 , and W 4 , W 12 are connections 324, 
326 to the preceding butterfly unit located in column 328. In practice the connections 
324, 326 are implemented as multiplications by W°. In moving from multiplier to 
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multiplier toward the left in Fig. 29, the lookup table space is multiplied by a power of 4 
at each stage. In Fig. 32 table 330, the lookup table for multiplier M 3 contains 512 
entries. It can be deduced by extrapolation that multiplier M 5 must contain 8192 twiddle 
factors, and corresponds to the size of the FFT being performed by the FFT processor 
5 284 (Fig. 29). 

Before examining the look-up table space in more detail it is helpful to consider the 
plurality of horizontal lines 332. Moving downward from the top of Fig. 28, the line 
beginning at x(3) extends to W 8 , which is the first twiddle factor required, and is at the 
third effective step in the flow diagram. Figs. 33 and 32 show the organization of the 

10 twiddle factors for each of the multipliers, wherein the terminology M k represents the 
multiplier associated with the kth stage. Thus table 334 relates to multiplier M 0 . The 
notation for the W values (twiddle factors) is shown in box 336. The subscript "B" at the 
bottom right represents a time stamp, that is an order dependency in which the twiddle 
factors are required by the pipeline. The superscript "A" represents the address of the 

15 .twiddle factor in its lookup table. The superscript "N" is the index of the twiddle factor. 

Thus in table 334 it may be seen that W° is required at time 0, W 1 at time 1 , and 
W° is again required at time 2. Further inspection of the other tables in Figs. 33,, 32 
reveals that half of the entries in each table are redundant. The storage requirement for 
the lookup tables can be decreased by 50% by eliminating redundant entries. This has 

20 been accomplished by organizing the W values in ascending order by index, so thatthe 
values can be stored in memory in ascending order. Thus in the case of table 338 the 
index values range from 0 to 21 , with gaps at 1 1 , 13, 16, 17. 19, and 20. 

The procedure for organizing the lookup table and the addressing scheme for 
accessing the twiddle factors is explained with reference to table 338, but is applicable 

25 to the other tables in Fig. 33. (1) Each row is assigned a line number as illustrated. (2) 
Each twiddle factor is assigned an order dependency which is noted in the lower right 
of its respective cell in table 338. (3) It is assumed that table 338 in its reduced form will 
contain only unique twiddle factors in ascending order by index within the memory 
address space. Consequently each twiddle factor is assigned a memory address as 

30 shown in the upper left of its respective cell. 

During address generation, for line 3 of table 338 the address is simply. held at 0. 
For line 1 the address is incremented by 1 to the- end of the line. However lines 0 and 
2 contain non-trivial address sequences. For line 0, looking at table 340, which contains 
64 values, it will be observed that the address sequence changes according to the 

35 ■ intervals 2,2.2,2. and then later 1,1,2,1 ,1,2 ... For line 2, the address first increments by 
3, then by 2. and finally by 1 . The locations at which the address increments change are 
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referred to herein as the "break-points". These values of the break points range between 
0, corresponding to the first point in line 2, to the last position in the line. 

By inspection it can be seen that the occurrence of the first break point changes 
from table to table following the recurrence relationship 



B1 Mn =4B1 Mni (28) 

with the initial condition 

B1 m 0 = 1 (29) 
10 where M N is the multiplier of the Nth stage of the FFT processor 284. 

Expanding the recurrence relationship gives: 

B1 Mu = <((4B1 M -1)x4-1)x4-1) ... (30) 



B1 Mn = 4 N B1 Mo -4 N " 3 -4 N 2 ...-4° (31) 



N-1 



B V = 4N B1 M -E4 n (32) 



N 

n-0 



20 Similarly the second break point B2 for line 2 is determined from the recurrence relation 

B2 Mn = 4B2 Mm t - 1 (33) 

with the initial condition 

B2 Mo = 1 (34) 

or 

B2 Mm = («4B2 Mb + 1)x4*1)x4 + 1) ... (35) 



N 



30 B2 Mk = £4" (36) 

N n-0 

Break point B3 for line 0 at which the sequence changes from increments of 
2,2,2,2 to the pattern 1,1,2,1,1,2. . . can be located by inspecting tables 338, 340, and 
330. In table 338 the break point B3 occurs very late in the line, such that the second 
35 sequence only presents its first two elements. By examining the address locations in the 
larger noted tables, it can be deduced that the location of break point B3 is related to 
the number of entries in a particular table as 
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where K is the number of tabie entries. In the tables in Fig. 29 K = 8, 32, 128, 2048, 
5 8192. Therefore, in terms of the N'th complex multiplier, break point B3 can be 
expressed as 

B3 Mn = 2 x 4 N + 2 (38) 

where N > 0. 

10 Address generators 342, 344. 346, 348 are operative for the lookup tables in 

RAMS 310, 312. 314, 316. Silicon area savings for the smaller tables 308, 306 are too 

small to make this scheme worthwhile. 

Fig. 34 schematically illustrates an address generator 342 for the above described 

address generation scheme, and is specific for the table 340 and multiplier M 2 . 128 
15 possible input states are accepted in lines in_Addr 350, and a multiplexer 352 selects 

the two most significant bits to decode 1 of 4 values. The output of the multiplexer 352 

relates to the line number of the input state. Actually the output is the address increment 

applicable to the line. number of the input state, and is used to control a counter 354 

whose incremental address changes according to value on line 356. Thus, the 
20 increment for line 3 of table 340 is provided to the multiplexer 352 on line 358, and has 

a value of zero, as was explained above. Similarly the increment for line 1 of table 340 

is provided to the multiplexer 352 on line 360. and has a value of 1 . 

The situations of line 0 and line 2 are more complicated. For line 0 the output of 

decoding iogic 362 is provided by multiplexer 364. and has either an incremental value 
25 of 2, or the output of multiplexer 366. The latter could be either 1 or 2. depending on the 

state of a two bit counter 368. which feeds back a value of 0 or 1 as signal count 370. 
Decoding logic 372 decodes the states for line 2 of table 340. The relationship of 

the current input state to the two break points of line 2 are tested by comparators 374. 

376. The break point is actually set one sample earlier than the comparator output to 
30 allow for retiming. The outputs of the comparators 374, 376 are selectors for the 

multiplexers 378. 380 respectively. 

The current address, held in accumulator 382 is incremented by the output of the 

multiplexer 352 by the adder 384. A simple iogic circuit 386 resets the outgoing address. 

which is contained in register ACC 388, by asserting the signal rst 390 upon completion 
35 of each line of table 340. This insures that at the start of the next line the address points 

to twiddle factor W° The new address is output on the 6 bit bus out_Address 392. which 

is one bit smaller than the input in_Addr 350. 
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Fig. 35 is a generalization of. address generator 342 (Fig. 34), in which the 
incoming address has a path of B bits. Like elements in Figs. 34 and 35 are given the 
same reference numerals. The structure of address generator 394 is similar to that of 
the address generator 342. except now the various lines of the input in_addr 396 and 
5 the output out_addr[B-2;0] 398 are denoted in terms of B. Thus the multiplexer 352 in 
Fig. 35 is selected by input in_addr [B-1:B-2] 400 . Similarly one of the inputs of 
comparator 374 and of comparator 376 is in_addr [B-3:0] 402. Out__addr[B-2:0] 398 
forms the output. The advantage of this structure is a reduction in the size of the lookup 
table RAM of 50%. 

10 The FFT calculation circuitry 168 (Fig. 14) is disclosed in Verilog code listings 1 - 

17. The Verilog code for the address generator 394 is generic, enabling any power-of- 
four table to be implemented. 
Channel Estimation and Correction 



15 estimation and correction block 170 (Fig. 14) is to estimate the frequency response of 
the channel based on the received values of the continuous and scattered pilots 
specified in the ETS 300 744 teiecommunicationsstandard. and generate compensation 
coefficients which correct for the channel effects and thus reconstruct the transmitted 
spectrum. A more detailed block diagram of the channel estimation and correction block 

20 170 is shown in Fig. 16. 

In acquisition mode, the channel estimation and correction block 170 needs to 
locate the pilots before any channel estimation can take place. The circuitry performs 
a convolution across the 2048 carriers to locate the positions of the scattered pilots, 
which are always evenly spaced, 12 carriers apart. Having found the scattered pilots. 

25 the continual pilots can be located; once this is done the exact position of the 1705 
active carriers within the 2048 outputs of the FFT calculation circuitry 168 (Fig. 14) is 
known. A timing generator 404 within the block can then be initialized, which then 
generates reference timing pulses to locate pilots for channel estimation calculation and 
for use in other functions of the demodulator as well. 

30 * Channel estimation is performed by using the evenly spaced scattered pilots, and 

then interpolating between them to generate the frequency response of the channel. 
The received carriers (pilots and data) are complex divided by the interpolated channel 
response to produced a corrected spectrum. A complete symbol is held in a buffer 406. 
This corrects for the bit-reversed order of the data received from the FFT calculation 

35 circuitry 168; It snould be noted that raw. uncorrected data is required by the frequency 
and sampling rate error circuitry. 



The function of the Channel estimation and correction circuitry shown in channel 
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The task of synchronizing to the OFDM symbol in the frequency domain data 
received from the FFT calculation circuitry 168 (Fig. 14) begins with the localization of 
the scattered and continual pilots, which occurs in pilot locate block 408. Scattered 
pilots, which according to the ETS 300 744 telecommunications standard, occur every 
5 12 data samples, offset by 3 samples with respect to the start of the frame in each 
succeeding frame. As the power of the pilot carriers is 4/3 the maximum power of any 
data carrier, a succession of correlations are performed using sets of carriers spaced 
at intervals of 12. One of the 12 possible sets is correlates highly with the boosted pilot 
carrier power. 

10 A first embodiment of the pilot search procedure is now disclosed with reference 

to Figs. 36 and 16. It should be noted that the scattered pilot search procedure is done 
on the fly, and storage is only required in so far as is necessary to perform the 
subsequent step of continual pilot location discussed below. At step 410. after the 
assertion of the signal resync 204, generally occurring after a channel change or on 

15 power up, the signal pilot_lock412 is set low. Then, at step 414 the process awaits the 
first symbol pulse from the FFT calculation circuitry 168 (Fig. 14) on line 416 indicating 
the start of the first symbol. The first symbol is received and stored. In one embodiment 
of the pilot search procedure each point from 0 to 2047 is read in turn, accumulating 
each value (jl> + IQj) in one of 12 accumulators (not shown). The accumulators are 

20 selected in turn in a cycle of 12, thus convolving possible scattered pilot positions. Two 
well known peak trackers indicate the accumulator with highest value (Peakl ) and the 
accumulator having the second highest value (Peak2). The accumulator haying the 
highest value corresponds to the scattered pilot orientation. The second highest value 
is tracked so that the difference between the highest peak and the second highest peak 

25 can be used as a "quality" measure. At decision step 418. if the two peaks are not far 
enough apart, a test for completion of a full range frequency sweep is made at decision 
step 420. If the test fails, failure of the scattered pilot search is reported at step 422. 
Otherwise, at step 424 the IQ Demodulator LO frequency is incremented by +1/8 carrier 
spacing by incrementing the magnitude of the control signal freq_sweep 426. Then the 

30 search for scattered pilots is repeated after delaying 3 symbols at step 428 to allow time 
for the effect of the change to propagate through the FFT calculation circuitry 168 and" 
buffers. The peak difference threshold can be altered by the control microprocessor via 
the microprocessor interface 142 and block 430. 

In a variation of the first embodiment there is only a single peak tracker which 

35 indicates the accumulator with highest value, which corresponds to the scattered pilot 
orientation. The true scattered pilot orientation thus found is one of 12 possible 
orientations. 
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If the test at decision step 418 is successful, the search for continual pilots is 
begun at step 432 by establishing an initial pilot offset from the 0 location in the RAM, 
storing the FFT data, according to the formula 

pilot offset = (accumulator # mod 3) (39) 

Thus, if the scattered pilot peak is in accumulator 0, 3, 6 or 9 the pilot offset is 0. If the 
scattered pilot peak is in accumulator 1, 4, 7, or 10 then pilot offset is 1, etc. Then 45 
carrier positions expected for continual pilots are read, adding the pilot offset value to 
the address, and accumulating + jqj) values. This procedure is repeated until first 
115 continual pilot start positions have been searched. From the ETS 300 744 tele- 
communications standard the number of possible first carrier positions among the active 
carriers lying in a contiguous block between carrier 0 and carrier 2047 is easily 
calculated as (2048-1705) / 3 = 1 1 5. as explained below. It is thus guaranteed that the 
active interval begins within the first (2048-1705) carrier positions. The carrier 
corresponding to the peak value stored is the first active carrier in the symbol. 

Upon completion of the continual pilot search, at step 434 the timing generator404 
is reset to synchronize to the first active carrier and scattered pilot phase. The signal 
pilot_lock412 is then set high at step 436, indicating that the pilots have been located 
successfully, then at step 436 the timing generator 404 is reset to synchronize to the 
first active carrier and scattered pilot phase. 

In a tracking mode of operation, shown as step 438, the scattered pilot search is 
repeated periodically, and evaluated at decision step 440. This can be done at each 
symbol, or less frequently, depending upon propagation conditions. The predicted 
movement of the scattered pilot correlation peak is reflected by appropriate timing in the 
timing generator404 ; and can be used as a test that timing has remained synchronized. 
Failure of the test at decision step 440 is reported at step 442. and the signal pilotjock 
412 is set low. 

A second embodiment of the pilot search procedure is now disclosed with 
reference to Figs. 16 and 37. At step 444 the assertion of the signal resync 204, 
generally occurring after a channel change or on power up, the signal pilotjock 412 is 
set low. Then, at step 446 a symbol is accepted for evaluation. A search for scattered 
pilots, conducted according to any of the procedures explained above, is performed at 
step 448. Then a search for continual pilots is performed as described above at step 
450. At decision step 452 it is determined whether two symbols have been processed. 
If the test fails, control returns to step 446 and another symbol is processed. If the test 
succeeds at step 454 another test is made for consistency in the positions of the 
scattered and continual pilots in the two symbols. If the test at step 454 fails, then the 
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procedure beginning with decision step 420 is performed in the same manner as 
previously described with reference to Fig. 36. If the test at step 454 succeeds at step 
456 the timing generator 404 is reset to synchronize to the first active carrier and 
scattered pilot phase. The signal pilotjock 412 is then set high at step 458, indicating 
5 that the pilots have been located successfully. 

In a tracking mode of operation, shown as step 460. the scattered pilot search is 
repeated periodically, and evaluated at decision step 462. This can be done at each 
cycle of operation, or less frequently, depending upon propagation conditions. The 
predicted movement of the scattered pilot correlation peak is reflected by appropriate 

10 timing in the timing generator 404. and can be used as a test that timing has remained 
synchronized. Failure of the test at decision step 462 is reported at step 464, and the 
signal pilotjock 412 is set low. 

It will be appreciated that after the scattered pilots have been located, the task of 
locating the continual pilots is simplified considerably. As the continual pilots are 

1 5 inserted at a known sequence of positions, the first of which is offset by a multiple of 3 
positions with respect to start of the frame, as specified by the ETS 300 744 telecommu- 
nications standard. Two of three possible location sets in the data space can therefore; 
be immediately excluded, and it is only necessary to search the third set. Accordingly 
the continual pilot search is repeated, each iteration beginning at a location 3 carriers 

20 higher. New accumulated values and the current start location are stored if they are 
larger than the previous accumulated value. This is repeated until all continual pilot start 
positions have been searched. The carrier corresponding to the largest peak valuer 
stored will be the first active carrier in the symbol. It is unnecessary to evaluate the 
"quality" of the continual pilot correlation peak. The scattered pilot search represents a 

25 correlation of 142 samples, and has higher noise immunity that of the search for 45 
continual pilots. The continual pilot search is almost certain to be succeed if scattered 
pilot search completed successfully. 

The above sequences locate scattered pilot positions within 1/4 symbol period, 
assuming accumulation at 40MHz. and locate continual pilots in less than 1 symbol 

30 period (45 x 1 1 5 clock cycles assuming 40MHz operation). 

* The. I and Q data is provided to the pilot locate block 408 by the FFT calculation 
circuitry 168 (Fig. 14) in bit-reversed order on line 416. This complicates the problem of 
utilizing a minimum amount of RAM while computing the correlations during pilot 
localization. Incoming addresses are therefore bit reversed, and computed modulo 12 

35 in order to determine which of 12 possible bins is to store the data. In order to avoid the 
square root function needed to approximate the carrier amplitude, the absolute values 
of the data are summed instead as a practical approximation. The scattered pilots are 
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determined "on the fly". The continual pilots are located on frames which succeed the 
frames in which the scattered pilots were located. 

The operation of the timing generator 404 is now disclosed in further detail. The 
addressing sequence for the RAM buffer 406 is synchronized by a symbol pulse from 
the FFT calculation circuitry 168 (Fig. 14). The FFT calculation process runs continu- 
ously once the first symbol from has been received following FFT Window acquisition. 
Addressing alternates between bit-reversed and linear addressing for successive 
symbols. The timing generator 404 also generates all read-write timing pulses. 

Signals u_symbol466 and c_symbol468 are symbol timing pulses indicating the 
start of a new uncorrected symbol or corrected symbol. The signal u_symbol 466 is 
delayed by latency of the interpolating filter 470 and the complex multiplier 472. which 
are synchronized to RAM Address Sequence Timing. 

For carrier timing the signals c_carrierO 474, pilot timing signals us_pilot(+) 476, 
uc_piiot(+) 478, c_tps_pilot(*) 480 and odd_symbol pulse 482 are referenced to a 
common start pulse sequence. A base timing counter (not shown) is synchronized by 
the pilot locate sync timing pulse 484, and is therefore offset from symbol timing. Pilot 
timing outputs are also synchronized to uncorrected symbol output from the buffer 406 
or the corrected symbol output delayed by the interpolating filter 470 and the complex 
multiplier 472. On assertion of the signal resync 204 all timing output is set to inactive 
states until the first symbol is received. Let the transmitted pilot at carrier k be P k and 
the received pilot be P' k . 

P k -H k w k P k (40) 
where P k is described beiow. and 

p ', = K + JQ k (41) 

where k indexes pilot carriers. H k is the channel response and w k is the reference 
sequence. We interpolate H k to generate compensation values for the received data 
carriers, D' k : 

D k = (43) 



where k indexes data carriers. Received pilots can be demodulated using a locally 
generated reference sequence and are then passed to the interpolating filter. *" 
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The interpolating filter 470, realized in this embodiment with 6 taps and 12 
coefficients, is utilized to estimate the portion of the channel between the scattered 
pilots. As explained above pilots are transmitted at known power levels relative to the 
data carriers and are modulated by a known reference sequence according to the ETS 
5 300 744 teiecommunicationsstandard. The transmitted pilot carrier amplitudes are ± 4/3 
of nominal data carrier power (+4/3 for reference bit of 1 , -4/3 for the reference bit of 0; 
quadrature component = 0 in both cases). Interpolation coefficients are selected from 
the 0-11 cyclic count in the timing generator 404 synchronized to data availability. 
Appropriate correction factors may be selected for data points to provide on-the-fiy 
1 0 correction. The coefficients vary depending on scattered pilot phase. Since the positions 
of reference pilots vary, therefore coefficients to compensate a given data carrier also 
vary. 

The input and output signals, and signals relating to the microprocessor interface 
142 of the channel estimation and correction block 170 are described in tables 18. 19 
15 and 20 respectively. The circuitry of the channel estimation and correction block 170 is 
disclosed in Verilog code listings 18 and 19. 

TPS Sequence Extract - L 

The tps sequence extract block 172 (Fig. 14), although set out as a separate block 
for clarity of presentation, is in actuality partially included in the channel estimation and 

20 correction block 170. It recovers the 68-bit TPS data carried in a 68-symbol OFDM 
frame, and is shown in further detail in Fig. 38. Each bit is repeated on 17 differential 
binary phase shift keyed ("DBPSK") modulated carriers, the tps pilots, within a COFDM 
symbol to provide a highly robust transport channel. The 68-bit tps sequence includes 
14 parity bits generated by a BCH code, which is specified in the ETS 300 744 

25 telecommunications standard. Of course appropriate modifications can be made by 
those skilled in the art for other standards having different BCH encoding, and for 
modes other than 2K mode. 

A clipper 486 clips incoming corrected spectrum data to ±1. The sign bit can be 
optionally evaluated to obtain the clipped result, in comparison block 488 clipped 

30 received tps pilot symbols are compared against a reference sequence input. In the 
described embodiment a value of 0 in the reference sequence matches -1 in the pilot, 
and a value of 1 in the reference sequence matches +1 in the pilot. Majority vote 
comparisons are used to provide an- overall +1 or -1 result . A result. of +1 implies the 
same modulation as the reference sequence, and a result of -1 implies inverse 

35 modulation. 

The DBPSK demodulator 490- converts the +/-1 sequence from the majority vote 
form to a binary form. The sequence converts to a value of 0 if the modulation in current 
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and previous symbols was the same, and to 1 if modulation between successive 
symbols is inverted. 

From an uninitialized condition a search for either of two sync words in 68-bit tps 
sequence (4 x 68-bit = 1 superframe) is conducted in the frame synchronizer block 492. 
5 The synchronization words of a superframe are as follows: 

0011010111101110 sync word for frames 1 and 3 

1 100101000010001 sync word for frames 2 and 4 

Having acquired either sync word, a search for the other is conducted in the appropriate 
position in the next OFDM frame. On finding the second sync word synchronization is 
10 declared by raising the signal tps_sync 494. Data is then passed to the BCH decoder 
496, which operates on 14 parity bits at the end of an OFDM frame against received 
data in the frame. Errors are corrected as necessary. 

Decoded data is provided to output store block 498, which stores tps data that is 
found in a full OFDM frame. The output store block 498 is updated only at the end of an 
1 5 OFDM frame. Only 30 bits of interest are made available. Presently some of these bits 
are reserved for future use. The length indicator is not retained. 

The BCH decoder 496 has been implemented in a manner that avoids the 
necessity of performing the Berlekamp Algorithm and Chien Search which are 
conventional in BCH decoding. The Galois Field Multiplier used in the BCH decoder 496 
20 is an improvement of the Galois Field Multipiierwhich is disclosed in our copending U.S. 
Application No. 08/801,544. 

The particular BCH code protecting the tps sequence is specified in the ETS 300 
744 telecommunications standard as BCH (67.53.t=2), having a code generator 
polynomial 

25 h(x) - x 14 +x 9 + x s +x 6 +x 5 + x 4 +x 2 -x + 1 (44) 

or equivaiently 

h(x) = (x 7 +x 3 -1) (x 7 +x 3 +x 2 +x-1) (45) 

30 The left factor is used to generate the Galois Field which is needed for error detection. 
Referring to Fig. 39, this is calculated in syndrome calculation block 500 which can be 
implemented using a conventional feedback shift registerto generate the a values. The 
first three syndromes are then computed by dividing the received signal R(x) by the 
values a 1 , cr. and a 3 , again using a conventional feedback shift register implementa- 

35 tion, as is well known in the art of BCH decoding. It can be shown that the syndromes 
are 
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S 0 = (a 1 ) e ° + (a 1 )* 1 (46) 
S, = (a 2 ) e ° + (a 2 ) 61 (47) 

S 2 = (a 3 ) e ° ^ (a 3 )* 1 (48) 

During the syndrome computation the syndromes are stored in storage registers 
R[2:0] 502. 

In the event S 0 is 0, then it can be immediately concluded that there are no errors 
in the current tps sequence, and a signal is asserted on line 504 which is provided to 
error detect block 506, and the data of the received signal R(x) either output unchanged 
or toggled according to the output of the error detect block 506 on line 508. As 
explained below, if 

s ! ° S 0 = S 2 (49) 

then exactly one error is present, a condition which is communicated to the error detect 
block 506 on line 510. Otherwise it is assumed that two errors are present. More than 
two errors cannot be detected . in the present implementation. 

In order to solve the system of three non-linear equations shown above, data flow 
from the registers R[2:0] 502 into search block 512 is enabled by a signal EOF 514, 
indicating the end of a frame. Three feedback shift registers 516, 518, 520 having 
respective Galois Field multipliers 522, 524, 526 for a" 1 - a" 3 in the feedback loop are 
initialized to 50H, 20H, and 3dH (wherein the notation "H" refers to hexadecimal 
numbers). The feedback shift registers 516. 518, 520 are clocked each time a new data 
bit is available. The syndromes and outputs of the feedback shift registers 516,518, 520 
are clocked into to a search module, which performs a search for the error positions 
using an iterative substitution search technique, which will now be described. The 
outputs of feedback shift registers 516, 518 are multiplied in a Galois Field Multiplier 
528. 

Considering the case of one error, S 0 is added, modulo 2, preferably using a 
network of XOR gates 530, to the output of the first feedback shift register 516 (a-gen 0 ). 
If the relationship 

< S 0^gen 0 ) = 0 (50) 

holds, it is concluded that there is an error in the present data bit. The bit being currently 
output from the frame store is toggled. The search is halted, and the data is output from 
the frame store. 
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Considering the case of two errors, if the following relationship holds, there is an 
error in the current bit being output from the frame store: 

(S 0 + a geno ) O (S,+a gen ) = (S 2 +a gen2 ) (5 1) 

5 It is now necessary to store the three terms calculated in the immediately preceding 
equation into the registers R[2:0] 502 which previously stored the syndromes S 0 - S 2 . 
This is represented by line 532. 

The process continues, now looking for the second error, and reusing the data in 
registers R[2:0] 502, which now contains the syndromes as adjusted by the previous 
10 iteration. The adjusted syndromes are denoted S 0 ' - S 2 '- 

S 0 = (So + a fl en 0 ) .etc. (52) 

Now, if 

< s o' + <W = 0 (53) 

15 

the second error has been found, and the bit being currently output from the frame store 
is toggled by XOR gate 534. If the search fails, more than two errors may be present 
and an error signal (not shown) is set. 

the Galois Field Multiplier 528 is a clocked digital circuit and is disclosed with 

20 reference to Fig. 40. The tps data is received very slowly, relative to the other processes 
occurring in the multicarrier digital receiver 126. It is thus possible to execute the 
iterative substitution search slowly, and the Galois Field Multipliers are designed for 
minimum space utilization. They do not require alpha generators, but rely on small 
constant coefficient multipliers, with iterative feedback to produce the required alpha 

25 values. The arrangement takes advantage of the relationship in Galois Field arithmetic 

a n = a 1 • a n 1 (54) 

After initialization by a signal init 536 which selects multiplexers 538, 540, the 

multiplicand A 542 is accumulated in register 544 and repeatedly multiplied by the value 
30 a 1 in multiplier 546. The output on line 548 is repeatedly ANDed bitwise with the 

multiplicandB held in a shift register 550. The output of the shift register is provided on' 

a one bit line 552 to the gate 554. The output of the gate 554 is accumulated in register 

556 using the adder 558. 

The input and output signals and signals relating to the microprocessor interface 
35 142 of the tps sequence extract block 172 are described in tables 21, 22, and 23. 

Circuitry of the tps sequence extract block 172 and the BCH decoder 496 is disclosed 

in Verilog code listings 20 and 21 . 
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Automatic Fine Frequency Control and Automatic Sampling Rate Control 

A non ideal oscillator present in the transmission chain of an orthogonal frequency 
division multiplexed ("OFDM") signal affects all carriers in the OFDM symbols. The 
OFDM carriers adopt the same phase and frequency disturbances resulting from the 
5 noisy local oscillator. Variations in the frequency of the Local Oscillator lead to phase 
shifts, and consequent loss of orthogonality within the OFDM symbol. Therefore 
competent automatic frequency control is required in the receiver to track the frequency 
offsets relative to the transmitter in order to minimize these phase shifts and hence 
maintain orthogonality. 

10 All the carriers within an OFDM symbol are equally affected by the phase shifts. 

This is similar to the common phase error caused by phase noise. The common phase 
error present on all carriers is used to generate an Automatic Frequency Control ("AFC") 
signal, which is completely in the digital domain, since l/Q demodulation is performed 
in the digital domain. The approach taken is the calculation of the common phase error 

15 for every OFDM symbol. This is achieved by using the reference pilots. The change in 
the common phase error is measured overtime to detect a frequency offset and is used 
to derive the AFC control signal. The generic approach for the AFC control loop and the 
automatic sampling rate control loop disclosed below is illustrated in Fig. 41. 

Automatic sampling rate control is required when the receiver's master clock is not 

20 aligned with that of the transmitter. The misalignment causes two problems: (1) the 
demodulating carriers have incorrect spacing; and (2) the interval of the FFT calculation 
is also wrong. 

The effect of this timing error is to introduce a phase slope onto the demodulated 
OFDM data. This phase slope is proportional to the timing error. The phase slope can 

25 be determined by calculating the phase difference between successive OFDM symbols, 
using reference pilots, and estimating the slope of these phase differences. A least 
squares approach is used for line fitting. The ASC signal is low-pass filtered and fed 
back to the sine interpolator 158 (Fig. 13). 

The mean phase difference between the reference pilots in subsequent OFDM 

30 symbols is used to calculate the frequency deviation. Assuming that the frequency 
deviations of the local oscillator. are constant, then the phase rotates with a, where, 
a = 2nf d mT t rads. Here f d is frequency deviation, rp is the number of symbols between 
repetitions of identical pilot positions, and T t is the period comprising the sum of the 
active interval and the guard interval. The AFC signal is generated over time by low 

35 pass filtering a. The value of the frequency deviation is then used to control the IQ 
demodulator 144 (Fig. 13). 



BNSDOCIO- <WO 9819410A2J > 



WO 98/19410 1>CT/US97/ 18911 

44 

The AFC and ASC control signals are effective only when a guard interval is 
passing indicated by the assertion of signal IQGI on line 1 54 (Fig. 1 3). This prevents a 
symbol from being processed under two different conditions. 

The correction circuitry 174 (Fig. 14) is shown in greater detail in Fig. 42. 
5 Frequency error values output on line 560 are calculated by determining the average 
of the differences of phase values of corresponding pilots in a current symbol and the 
previous symbol. The resulting frequency error value is filtered in low pass filter 562 
before being fed-back to the IQ demodulator 144 (Fig. 1 3). It is optional to also evaluate 
continual pilots in order to cope with larger frequency errors. Sampling rate error, output 
10 on line 564 is determined by looking at the phase difference between pilots in a symbol 
and the same pilots in a previous symbol. The differences vary across the symbol, 
giving a number of points through which a line can be fitted using the well known 
method of least squares regression . The slope of this line is indicative of the magnitude 
and direction of the sampling rate error. The sampling rate error derived in this way is 
15 filtered in low pass filter 566 before being fed back to the sine interpolator 158 (Fig. 13). 

A separate store 568 for the scattered pilots contained in 4 symbols is shared by 
the frequency error section 570 and the sampling rate error section 572. Direct 
comparison of scattered pilot symbols is thereby facilitated, since the scattered pilot 
phase repeats every four symbols. In an alternate embodiment where scattered pilots 
20 are used to provide control information, storage must be provided for four symbols. In 
the preferred embodiment, wherein control information is derived from continual pilots, 
storage for only one symbol is needed. 

Recovery of the angle of rotation a from the I and Q data is accomplished in the 
phase extract block 574. where 



25 



a - tan 1 (Q / 1) . (55) 



In the presently preferred embodiment, the computations are done at a resolution of 14 
bits. The phase extract block 574 is illustrated in greater detail in Fig. 43. The quadrant 
of a is first determined in block 576. The special cases where I or Q have a zero 

30 • magnitude or I = Q is dealt with by the assertion of signals on lines 578. If the magnitude 
of Q exceeds that of I, quotient inversion is accomplished in block 580. utilizing a control 
signal 582. A positive integer division operation is performed in division block 584. 
Although this operation requires 11 clock cycles, there is more than enough time 
allocated for phase extraction to afford it. The calculation of the arctangent of the 

35 quotient is accomplished by a pipelined, truncated iterative calculation in block 586of the 
Taylor Series 
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w 3 w 5 y ' y ^ 

tan '(x) = x -— +— - — ^— . ix|<1 (56) 

3 5 7 9 

Block 586 is shown in greater detail in the schematic of Fig. 44. The value x 2 is 
5 calculated once in block 588 and stored for use in subsequent iterations. Powers of x 
are then iteratively computed using feedback line 590 and a multiplier592. The divisions 
are calculated using a constant multiplier 594 in which the coefficients are hardwired. 
The sum is accumulated using adder/subtractor 596. The entire computation requires 
47 - 48 clock cycles at 40 MHz. 

10 Turning again to Fig. 43, quadrant mapping, and the output of special cases is 

handled in block 598 under control of block 576. It may be noted that the square error 
of the result of the Taylor Expansion rises rapidly as a approaches 45 degrees, as 
shown in Fig. 45 and Fig. 46, which are plots of the square error at different values of 
a of the Taylor expansion to 32 and 31 terms respectively. The Taylor expansions to 31 

15 and 32 terms are averaged, with the result that the square error drops dramatically, as 
shown in Fig. 47. A memory (not shown) for holding intermediate values for the 
averaging calculation is provided in block 598. 

Constant-Phase Error across all scattered Pilots is due to frequency offset at* ip 
Demodulator. Frequency Error can be defined as: 



20 



35 



f a 

f err = — - (57) 
2nmT t 



where a. m and T have the same meanings as given above, a is determined by taking 
the average of the difference of phase values of corresponding pilots between the 

25 current symbol and a symbol delayed for m symbol periods. In the above equation, m 
= 1 in the case of continual pilots. This computation uses accumulation block 600 which 
accumulates the sum of the current symbol minus the symbol that preceded it by 4. 
Accumulation block 602 has an x multiplier, wherein x varies from 1 to a minimum of 142 
(in 2K mode according to the ETS 300 744 telecommunicationsstandard). The low pass 

30 filters 562, 566 can be implemented as moving average filters having 10-20 taps. The 
data available from the accumulation block 602 is the accumulated total of pilot phases 
each sampled m symbols apart. The frequency error can be calculated from 



r _ Acc(new -old} 
err_ (N)(2)nmT t (58) 

N = 142 in the case of scattered pilots, and 45 for continual pilots, assuming 2K 
mode of operation according to the ETS 300 744 telecommunications standard. The 
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technique for determining sampling rate error is illustrated in Fig. 48, in which the phase 
differences of pilot carriers, computed from differences of every fourth symbol (S n - 
are plotted against frequency of the carriers. The line of best fit 604 is indicated. A slope 
of 0 would indicate no sampling rate error. 



frequency sweep is initiated by block 608, which inserts an offset into the low-pass 
filtered frequency error output using adder 610. Similarly a frequency sweep is initiated 
by block 61 2, which inserts an offset into the low-pass filtered sampling rate error output 
using adder 614. The frequency sweeps are linear in increments of 1/8 of the carrier 

10 spacing steps, from 0 - 3.5kHz corresponding to control signal values of 0x0-0x7. 

A preferred embodiment of the correction circuitry 174 (Fig. 14) is shown in greater 
detail in Fig. 49. Continual pilots rather than scattered pilots are held in a memory store 
616 at a resolution of 14 bits. The generation of the multiplier x for the computation in 
the accumulation block 618 is more complicated, since in accordance with the noted 

15 ETS 300 744 telecommunicationsstandard, the continual pilots are not evenly spaced 
as are the scattered pilots. However, it is now only necessary to evaluate 45 continual 
pilots (in 2K mode according to the ETS 300 744 telecommunicationsstandard). In this 
embodiment only the continual pilots of one symbol need be stored in the store 616. 
Inclusion of the guard interval size, is necessary to calculate the total duration of the 

20 symbol T t . is received from the FFT window circuitry (block 166, Fig. 14) on line 620. 

The input and output signals and signals relating to the microprocessor interface 
142 of the circuitry illustrated in Fig. 42 are described in tables 24, 25, 26, and Table 27 
respectively. The circuitry is further disclosed in Verilog code listings 24 - 35. 
Demapper 

25 The demapping circuitry 176 (Fig. 15) is shown as a separate block for clarity, but 

in practice is integrated into the channel estimation and correction circuitry. It converts 
I and Q data ; each at 12-bit resolution into a demapped 12-bit coded constellation 
format (3-bit I, I soft-bit, 3-bit Q, Q soft-bit). The coded constellation is illustrated in Fig. 
50 and Fig. 51. For 64-QAM the 3 bits are used for the I and Q values, 2 bits for 
30 16-QAM 2-bits and 1 bit for QPSK. 

For example in Fig. 51 values of l= 6.2, Q= -3.7 would be*demapped to: l-data = 
001; I soft-bit=01 1; Q-data=101; Q soft-bit=101 . 

The input and output signals of the demapping circuitry 1 76 are described in tables 
28 and 29 respectively, 
35 Symbol Deinterleaver 

The symbol deinterleaver 1 82 (Fig . 1 5) reverses the process of symbol interleaving 
of the transmitted signal. As shown in Fig. 52 the-deinterleaver requires a 1512 x 13 



5 



Upon receipt of control signal 606 from the pilot locate block 408 (Fig. 14), a 
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memory store, indicated as block 622. The address generator624 generates addresses 
to write in interleaved data and read out data in linear sequence. In practice the address 
generator 624 is realized as a read address generator and a separate write address 
generator. Reading and writing occur at different instantaneous rates in order to reduce 
5 the burstiness of the data flow. The address generator 624 is resynchronized for each 
new COFDM symbol by a symbol timing pulse 626. Carrier of index 0 is marked by 
carrierO pulse 628. Addresses should be generated relative to the address in which this 
carrier is stored. 

The input and output signals of the symbol deinterleaver 182 are described in 
10 tables 30 and 31 respectively. Circuitry of the symbol deinterleaver 182 is disclosed in 
Verilog code listing 22. 
Bit Deinterleaver 

Referring to Fig. 54, the bit deinterleaver 1 84 (Fig. 1 5) reverses the process of bit- 
wise interleaving of the transmitted signal, and is shown further detail in Fig. 53. In soft 

15 encoding circuitry 630 input data is reformatted from the coded constellation format to 
a 24 bit soft l/Q format. The soft encoding circuitry 630 is disclosed for clarity with the 
bit deinterleaver 184, but is realized as part of the symbol deinterleaver discussed 
above. The deinterleave address generator 632 generates addresses to read the-6 
appropriate soft-bits from the 126 x 24 memory store 634, following the address 

20 algorithm in the ETS 300 744 telecommunications standard. The deinterleave address 
generator 632 is resynchronized for each new COFDM symbol by the symbol timing 
pulse 626. 

The output interface 636 assembles I and Q output data streams from soft-bits 
read from the memory store 634. Three I soft bits and three Q soft bits are extracted 
25 from the memory store 634 at each deinterleave operation, and are parallel-serial 
converted to provide the input data stream to the Viterbi Decoder 186 (Fig. 15). 

The input and output signals of the bit deinterleaver 184 are described in tables 
32 and 33 respectively. Circuitry of the bit deinterleaver 1 84 is disclosed in Verilog code 
listing 23. 

30 Host Microprocessor Interface 

The function of the microprocessor interface 142 is to allow a host microprocessor 
to access control and status information within the multicarrier digital receiver 1 26 (Fig. 
12). The microprocessor interface 142 is shown in greater detail in Fig. 55. A seriai 
interface 638 and a parallel interface 640 are provided, the latter being primarily of value 
35 for testing and debugging. The serial interface 638 is of known type and is I2C 
compatible. The microprocessor interface 142 includes a maskable interrupt capability 
allowing the receiver to be configured to request processor intervention depending on 
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internal conditions. It should be noted, that the multicarrier digital receiver 126 does not 
depend on intervention of the microprocessor interface 142 for any part of its normal 
operation. 

The use of interrupts from the point of view of the host processor is now described . 
5 "Event" is the term used to describe an on-chip condition that a user might want to 
observe. An event could indicate an error condition or it could be informative to user 
software. There are two single bit registers (not shown) are associated with each, 
interrupt or event. These are the condition event register and the condition mask 
register. 

10 The condition event register is a one bit read/write register whose value is set to 

one by a condition occurring within the circuit. The register is set to one even if the 
condition only existed transiently. The condition event register is then guaranteed to 
remain set to one until the user's software resets it, or the entire chip is reset. The 
condition event register is cleared to zero by writing the value one. Writing zero to the 

1 5 condition event register leaves the register unaltered. The condition event register must 
be set to zero by user software before another occurrence of the condition can be 
observed. 

The condition mask register is a one bit read/write register which enables the 
generation of an interrupt request if the corresponding condition event register is set. 

20 If the condition event is already set when 1 is written to the condition mask register an 
interrupt request will be generated immediately. The value 1 enables interrupts. The 
condition mask register clears to zero on chip reset. Unless stated otherwise a block will 
stop operation after generating an interrupt request and will restart soon after either the 
condition event register or the condition mask register are cleared. 

25 Event bits and mask bits are always grouped into corresponding bit positions in 

consecutive bytes in the register map. This allows interrupt service software to use the 
value read from the mask registers as a mask for the value in the event registers to 
identify which event generated the interrupt. There is a single global event bit that 
summarizes the event activity on the chip. The chip event register presents the OR of 

30 all the on-chip events that have 1 in their respective mask bit. A value of 1 in the chip 
mask bit allows the chip to generate interrupts. A value of 0 in the chip mask bit 
prevents any on-chip events from generating interrupt requests. Writing 1 or 0 to the 
chip event register has no effect. The chip event register only clears when all the events 
enabled by a 1 in their respective mask bits have been cleared. 

35 The IRQ signal 642 is asserted if both the chip event bit and the chip event mask 

are set. The IRQ signal 642 is an active low. "open collector" output which requires an 
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off-chip pull-up resistor. When active the IRQ output is pulled down by an impedance 
of 100Q or less. A pull-up resistor of approx. 4kQ is suitable. 

The input and output signals of the microprocessor interface 142 are described in 
tables 34 and 35 respectively. 
5 System Controller 

The system controller 198 (Fig. 15), which controls the operation of the multicarrier 
digital receiver 126 (Fig. 12), in particular channel acquisition and the handling of error 
conditions, is shown in further detail in Fig. 56. 

Referring to the state diagram in Fig. 57, the channel acquisition sequence is 
1 0 driven by four timeouts. 

(1 ) AGC acquisition timeout. 20 ms (80 symbols) are allowed for the AGC to bring 
up the signal level, shown in step 644. Then the FFT window is enabled to start 
acquisition search in block 646. 

(2) Symbol acquisition timeout: 200 symbol periods, the maximum guard interval 
15 plus active symbol length, is allocated to acquire the FFT window in step 648. Another 

35 symbol periods are allocated to pilot location in step 650. Approximately 50 ms are 
required to process 2K OFDM symbols. An option is provided to exit step 650 as soon 
as the pilots have been located to save acquisition time in non-extreme situations. - 

(3) Control Loop Settling timeout; A further 1 0 ms, representing approximately 40 
20 symbols is allocated to allow the control loops to settle in step 652. An option is provided 

to exit step 652 and return to an initial step resync 654 if pilots have been lost if control 
loop settling timeout occurs. 

(4) Viterbi synchronizationtimeout: in block 656 approximately 1 50 symbol periods 
are allocated for the worst case of tps synchronization, indicated by step 658 and 

25 approximately 100 symbol periods for the Viterbi Decoder 186 (Fig. 15) to synchronize 
to the transmitted puncture rate, shown as step 660. This is approximately 65 ms. In 
reasonable conditions it is unnecessary to wait this long. As soon as Viterbi synchroni- 
zation is established, then transition to the systemjock state 662. It is possible to 
bypass the tps synchronization requirement by setting parameters (see table below) in 

30 the receiver parameters register and setting set_rx_parameters to i. 

If acquisition fails at any stage, the process automatically returns to step resync 
654 for retry. 

Having acquired lock, the system will remain in lock unless a Reed-Solomon 
overload event occurs, i.e. the number of Reed-Soiomon packets with uncorrectable 
35 errors exceeds a predetermined value (the rso_iimit value) in any 1 second period. If 
any of the 4 synchronizing state machines in the acquisition sequence, FFT window 
(step 648), pilct locate (step 650), tps synchronization (step 658) and Viterbi synchroni- 
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zation (step 660), lose synchronization once channel acquisition has occurred, no action 
will be taken until an event, rso_event. occurs and the step resync 654 is triggered 
automatically. 

In poor signal conditions acquisition may be difficult, particularly the Viterbi 
synchronization. Therefore a bit is optionally provided in the microprocessor interface 
142 ( Fig. 12). which when set extends the timeouts by a factor of 4. 

The input and output signals, and the microprocessor interface registers of the 
system controller 198 are described in tables 36, 37, 38, and 39 respectively. 



Tables 



Pin Name 


I/O j 


Description 


Tuner/ADC Interface 


SCLK 


O 


Sample clock for ADC 


IDATA[9:0] 


I 


Input ADC data bus (10-bit) 


AGC 


o 


Automatic Gain Control to 
tuner(Sigma-Delta output) 


XTC[2:0] 


o 


External Tuner Control Outputs 


MPEG-2 Transport Interface 


OUTDAT[7:0] 


o 


MPEG-2 Transport Stream Data bus 


OUTCLK 


0 


MPEG Transport Stream Output Clock 


SYNC 


o 


MPEG Transport Stream Sync pulse (1 
per 188byte) 


VALID 


o 


MPEG Transport Stream Valid data fiag 


ERROR 


o 


MPEG Transport Stream Errored data 
flag 


Serial Host Microprocessor Interface 


SD 


I/O 


Serial Interface Data 


SC 


I 


Serial Interface Clock 


SDT 


I/O' 


Serial Data Through ' . 


SCT • - 


O 


Serial Clock Through (40MHz clock out 
when DEBUG is high) 


SADDR[2:0] 


I 


Serial Address Inputs (Hardwired exter- 
nal value) used as TSEL pins when DE- 
BUG is high 


Parallel Host Microprocessor Interface 
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rin Name 


I/Pi 


Description 


MAlO.UJ 




Microprocessor Address bus 


mu[l .\J\ 


I/O 
1/ \-J 


microprocessor uata dus z-dii/l/dduo 
data @40MHz 


MWE 




Microprocessor Write Enable 


MCE 




Microprocessor Chip Enable 


NOTIRQ 


o 


Interrupt Request 


JTAG Test Access Port 


TCK 




JTAG Test Clock 


TMS 




JTAG Test Mode Select 


TDI 




JTAG Test Data In 


TDO 


o 


JTAG Test Data Out 


NTRST 




JTAG TAP Controller Reset 


Miscellaneous Pins 


NRESET 




Asynchronous Reset 


CLK40 




40MHz Input Clock 


TSTRI 




Transport Stream Interface tristate con- 
trol 


TA (MA[6]) 




Test Address Bit - Snooper access (Bit 7 
of up address bus) 


DEBUG 




Test Pin 


TSEL [2:0]/SADDR[2:0] 




Internal Test Inputs (mux out internal 

data onto MD[7:0]) 

0 = normal upi, 

1= fft input data (24-bit), 

2 = fft output data (24-bit), 

3 = channel correction output data 
(24-bit), 

4 = fee input data. (2 x 3-bit softbit) 

all data clocked out @40MHz, 24 : bit data 
in 4 bytes. Clock brojught out on SCT pin, 
for convenience. Symbol timing/other 
synch, signals indicated with market bits 
in data. 


TLOOP 


1 


Test Input 


Ta 


ble 4 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 


UXUU 


Event Reg. 




0 


R/W/0 


chip_event 


OR of all events which are 
interrupt-enabled (un- 
masked) 




1 


R/W/0 


lock_failed_event 


Set to 1 if channel acquisi- 
tion sequence fails 




2 


R/W/0 


rs_over!oad_event 


Set to 1 if Reed-Solomon 
Decoder exceeds set 
threshold within one 1 sec- 
ond period 


0x01 


Mask Reg. 




0 


R/W/0 


chip_mask 


Set to 1 to enable IRQ out- 
put 




1 


R/W/0 


lock_failed_mask 


Set to 1 to enable interrupt 
on channel acquisition fail 




2 


R/W/0 


rs_overload_mask 


Set to 1 to enable interrupt 
on RS error threshold ex- 
ceeded 


0x02 


Status Reg. 




0 


R/0 


systemjocked 


Set to 1 when system ac- 
quired channel successfully 




1 


R/0 


viterbi_sync 


Set to 1 when Viterbi is syn- 
chronized 




2 


R/0 


tps_sync 


Set to 1 when OFDM frame 
carrying TPS data has been 
synchronized to. 




3 


R/0 


pilotjoc 


Set to 1 when pilots in 
COFDM symbol have been 
located and synchronized 
to 




4 


R/0 


fftjoc 


Set to 1 when guard inter- 
val has been located and 
synchronized to. 




7:5 • 


R/1 


viterbi_rate 


Received Viterbi Code rate ■' 


0x04- 
0x05 


Control Reg: 


0 


R/W/0 


change_channel 


When set to 1 , holds device 
in "Reset" state. Clearing 
this bit initiates channel 
change. 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 




1 


R/W/0 


agcjnvert 


Invert AGC Signa-Delta 
output. Default setting 
means low output associ- 
ated with reduced AGC 
gain. 




2 


R/W/0 


o__clk_phase 


Set to 1 to invert phase of 
output clock. Default condi- 
tion: output data changes 
on falling edge of output 
clock. 




3 


R/W/0 


set_rx_p a ra mete rs 


Set to 1 to take Receiver 
Parameter Data from Re- 
ceiver Parameter Register. 
Default condition: settings 
taken from TPS data (lon- 
ger channel acquisition 
time) 




4 


R/W/0 


extend_agc 


Set to 1 to hold acquisition 
sequence in agc_acquire 

old it? 




5 


R/W/0 


extendjfs 


Set to 1 to hold acquisition 
sequence in fs_acquire 

o id ic 




6 


R/W/0 


extend_settle 


Set to 1 to hold acquisition 
cpniipnrp in ^pttle state 




7 


R/W/0 


extend_sync 


When set to 1 to hold ac- 
quisition sequence in 
vit_sync state 




10:8 


R/W/0 


xtc 


External Tuner Control bits 
(external pins XTC[2:0]) 




11 


R/W/0 


i2c_gate 


12C "Gate" signal; setting 
this to 1 enables the isola- 
tion buffer between the 
"processor side12C" bus 
and the Tuner side 12C 
so the processor can ac- 
cess a Tuner through 
COFDM device. Setting to 
0 closes the "gate" to pre- 
vent 12C bus noise affect- 
ing delicate RF. 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 




12 


R/W/ 
(TSTRI) 


ts_tri 


Transport Stream Tristate 
control - set to 1 to tristate 
MPEG TS interface (e.g. to 
mux a QPSK device to 
same MPEG demux). 
Power-on state of TS out- 
put controlled by external 
pin TSTRI. 




13 


R/W/0) 


fast_ber 


Set to 1 to reduce BER 
counter, vitjll_state coun- 
ter and rso_counter, coun- 
ter periods from 1 sec to 
100ms. 




15 


R/W/0 


soft_reset 


Software Reset - set to 1 to 
reset all blocks except upL 
Set to 0 to release. 


0x06- 
0x07 


Receiver Parameter Register: 




15:14 


R/W/2 


upi_constellation 


Constellation Pattern for 
Demapper and Bit 
Deinterleaver (reset condi- 
tion = 64-QAM) 




13:12 


R/W/0 


upi_guard 


Guard Interval: 00 = 1/32, 
01 = 1/16. 10 = 1/8, 11 = 
1/4 




11:9 


R/W/0 


upi_alpha 


Hierarchical Tranmission 
Mode or "alpha value" (re- 
set condition = 
non-hierarchical mode) 




7:5 


R/W/0 


upi_hp_rate 


Viterbi Code Rate for HP 
stream - in non-hierarchical 
mode this is taken as the 
Viterbi Code Rate (reset 
condition =1/2 rate code) 




4:2 


R/W/0 


upi_lp_rate 


Viterbi Code Rate for LP 
stream (reset condition = 
1/2 rate code) 




1:0 


R/W/0 


upi_tx__mode 


Tranmission mode (00=2K, 
01=8K, others reserved) 


0x08 


7:0 


R/W/0 


rsojimit 


Errored packet per second 
limit (for rs overload event 
bit) 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 


0x09 


7:0 


R/0 


rso_count 


Count of Uncorrectable 
Transport Packets per sec- 
ond (saturates at 255). 
Write to register to latch a 
stable count value which 
can then be read back 


0x0a- 
0x0b 


15:0 


R/0 


ber 


BER (before RS) deduced 
from RS corrections in 1 
second period - max cor- 
rectable bit errors 
~1.35M/secfor 7/8, 
64-QAM, 1/32 Gl (equiva- 
lent to 43.e-3 BER assum- 
ing useful bitrate of 31.67 
e6). Only top 16 bits of 21 
bit counter are visible - res- 
olution of ~1e-6 depending 
on code-rate, constellation 
Gl length. Write to register 
to latch a stable count 

wott iq » * / 1~\ i h thon ho 
VdlUtr WlllUll udll liltJll ut; 

read back. 


OvHr 
UaUU- 

OxOd 


15:0 


R/0 


agc_level 


AGC "Control Voltage" 
(msb's) 


OxOe- 
OxOf 


11:0 


R/0 


freq_error 


IQ Demodulator Frequency 
Error (from feedback loop) 


0x10- 
0x13 


TPS Data (including future use bits) 




1:0 


R/0 


tps_frame 


Number of last received 
cmplete OFDM frame in 
superframe 


3:2 


R/0 


tps_constellation 


Constellation Pattern from 
TPS data 


7:5 


R/0 


tps_alpha 


Hierachical Transmission 
Information 




10:8 


R/0 


tps_hp_rate 


Viterbi Code Rate of' 
High-Priority stream (In* 
non-hierarchical mode this 
is the code rate of the en- 
tire stream) 


13:11 


R/0 


tps_lp_rate 


Viterbi Code Rate of 
Low-Priority stream 


15:14 


R/0 


tps_guard_int 


Guard Interval 
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MU- 

dress 
(Hex) 


Rit Nn 


Dir/Re- 
set 


Rpni^ter Name 


Description 




17:16 


R/0 


tps_tx_mode 


Transmission Mode 




31:19 


R/0 


tps_future 


Undefined bits allocated for 
future use 


*** Debug Access *** 


0x20- 
0x21 


15 


D A A //A 
K/W/U 


agc_open 


oet to i to ureaK moo cun- 
trol loop 




1 1:0 


K/W/0 


agc_twiddle 


a<jO twtaoie tactor 


0x22- 
0x23 




R/W/0 


agc_loop_bw 


AGC Control loops parame- 
ters 


0x24- 
0x25 


15 


R/W/0 


freq_open 


Set to 1 to break freq con- 
trol loop 




14 


R/W/0 


freq_nogi 


Set to 1 to allow frequency 
update anytime, not just 
during ouara interval 




11:0 


R/W/0 


freq_twiddle 


IQ Demod twiddle factor 


0x26- 
0x27 






freqJoop_bw 


Frequency Control Loop 
parameters 


0x28- 
0x29 


15 


R/W/0 


sample open 


Set to 1 to break sample 
control loop 




14 


R/W/0 


sample_nogi 


Set to 1 to allow sample 
update anytime, not just 
during Guard Interval 




11:0 


R/W/0 


sampie_twiddle 


Sampling Rate Twiddle fac- 
tor 


0x2a- 
0x2b 




R/W/0 


sample_loop_bw 


Sampling Rate Control 
Loop parameters 


0x2c- 
0x2d 


11:0 


R/0 


sampling_rate_err 


Sampling Rate Error (from 
feedback loop) 


0x30- 
0x31 


15 


R/W/0 


lock_fft_window 


Set to 1 to prevent 
fft_window moving in Track- 
ing mode 




14 


R/W/0 


inc_fft__window 


•Write 1 to move fft_window 
position one sample period 
later (one-shot operation) 




13 


R/W/0 


dec_fft_window 


Write 1 to move fft_window 
position one sample period 
earlier (one-shot operation) 




12:0 


R/0 


fft_window 


FFT Window position 
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Ad- 
dress 
(Hex) 


Bit No. 


Dir/Re- 
set 


Reai^tpr Mamp 


L/CoL.1 IfJllUl 1 




7:0 


R/W/0 


fft_win_thresh 


FFT Window Threshold 


0x34- 
0x35 


15 


R/W/0 


set_carrier_0 


Set to 1 to use carrier_0 
value as setting 


11:0 


R/W/0 


carrier_0 


Carrier 0 position; readback 
value detected by Pilot Lo- 
cate algorithm or force a 
value by writing over it 


0x36 


7:0 


R/W/ 


csi_thresh 


Channel State Information 
threshold - the fraction of 
mean level below which 
data carriers are marked by 
a bad_carrier flag. Nomi- 

iidiiy \j . c-i \j LrUUc i die/. 


0x37 










0x38- 
0x39 


11:0 


R/0 


vit_ill_states 


Viterbi Illegal State Rate 
(per second)Write to regis- 
ter to latch count which can 
then be read back 


* — * SNOOPERS ***** ( External test address bit TA[6] = 1 ) 


0x40- 
0x41 


15:14 
11:0 


R/WR/ 
W 


T.IQGIFreq error[ 
11:0] 


IQ Demod Snooper (Note: 
bit 0 = Isb of highest ad- 
dressed byte, 21) 


0x44- 
0x47 


31:30 
27:16 
11:0 


R/W 
R/W 
R/W 


T. Valid 

Q-data[11:0] 

l-data[11:0] 


Low-Pass Filter Snooper 


0x48- 
0x4d 


47:46 
43:32 
31 

27:16 
11:0 


R/W 
R/W 
R/W 
R/W 
R/W 


T.SincGI 

Sample err[11:0] 
Valid 

Q-data[11:0] 
l-data[11:0] 


Resampler Snooper 


0x50- 
0x53 


31:29 
27:16 
11:0 


R/W 
R/W 
R/W 


T. Valid. Resync 

Q-data[11:0] 

l-data[11:C] 


FFT Snooper 


0x54- 
0x57 


31 
29 
27 
11 


30 
28 
•16 
0 


R/W 
R/W 
R/W 
R/W 


T. Valid. 
Symbol. Resync 
Q-data[11:0] • 
l-data[11:0] 


Channel Estimation & Cor- 
rection Snooper ; 


0x58- 
0x5b 


31 
29 
27 
11 


30 
28 
16 
0 


R/W 
R/W 
R/W 
R/W 


T, Resync 

u symbol, uc pilot 

Q-data[11:0] 

l-data[11:0] 


Frequency & Sampling Er- 
ror Snooper 
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AQ- 


Dil INO. 


L/ll /r\c?- 


r\egisier rviame 


uescnption 


dress 




set 






(Hex) 










r\ v . r- _ 




PAA/ 
K/VV 


i , Kesync 


i no oequence txiraci 


UXOT 




RAA/ 
r\/vV 


c symDOi, ips pu. 


onoopers 






R/W 

i\/ V V 


W Udla[ I I .UJ 








RAA/ 
r\/ v v 


rpfpronro con 
iclclci itc bulj 








RAA/ 
l\/VV 


l-Qclla[ I I .UJ 




0x60- 


39 


R/W 


T 


Demap Snooper 


UXDO 




RAA/ 

1 \f V V 


^Ul lOldlClllUI l 






JH.J4 


R/W 

Pv/ V V 


ainha 








R/W 
r\/ v v 


W Udld[ 1 I .UJ 






15:14 


R/W 


Valid, c_symbol 






13 


R/W 


c carrierO 






11:0 


R/W 


l-data[11:0] 




(JXbo- 




D AA/ 
K/Vv 


i . vaiiu symDOi, 


oymDoi ueinteneave 


0x6a 


21:20 


R/W 


carrierO 


Snooper 




19 


R/W 


odd_symbol 




11:0 


R/W 


demap_data[11:0] 




0x6c- 


23:21 


R/W 


T, valid, symbol 


Bit Deinterleaver Snooper 


0x6e 


20:19 


R/W 


constellation 




18:16 


R/W 


alpha 






11:0 


R/W 


symdi_data[1 1:0] 




0x70- 


15:13 


R/W 


T, valid, resync 


Viterbi Snooper 


0x71 


6:4 


R/W 


Q-data[2:0] 






2:0 


R/W 


l-data[2:0] 




0x72- 


15:14 


R/W 


T, valid, 


Forney Deinterleaver 


0x73 


13:12 


R/W 


resync, eop 


Snooper 




7:0 


R/W 


vit_data[7:0] 




UX / *+- 


1 1 z 

I O. I *4 


RAA/ 
r\/VV 


I . VdllU , 


Keea ooiomon onooper 


0x75 


13:12 


RAA/ 


resync. eop 




7:0 


RAA/ 


deint_data[7:0] 






1 *v 1 A 


RAA/ 

1 A/ V V 


~Y wahH 

I , VallU , 


r^ritp»iit 1 ntortQPO ^nnnnpr 
Uuipui I M Lt;l icJL-c; oiiuuptri 


Ov77 

UX / / 




R/W 

r\/ V V 


icoyrio, cup 






I I .u 


R/W 

1 \/ V V 








7-n 

/ .u 


R/W 

l\/ V V 


Hoint riatar7m 
UfcJINl Uala[/.UJ 




0x78- 


31 


RAA/ 


T 


System Controller Snooper 
* 


0x7b 


30:20 


RAA/' 


tps_data[10:0] 




19:18 


RAA/ 


pkt_err. err_val 






17 


RAA/ 


vit_i I Instate 






16 


R/W 


vitjll_val 






14 


RAA/ 


rs_corr_val 






13:8 


RAA/ 


rs_correct[5:0] 






6:5 


RAA/ 


vit_sync, tps_sync 






4:3 


RAA/ 


pilot loc, fft loc 






2:0 


RAA/ 


vit rate[2:0] 





Tabie 5 
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Signal 


Description 


elk 


40MHz main clock 


Hk20M 


20MH7 ^amnlp Hnrk ^ii^^ri a "v/aliH H cinnal tn infiiratp 

when valid input samples are received) 


data[9:0] 


sampled data input from ADC 


sac resvnc 


control inout* held low on channel channp - on transition 
to high AGC should reset itself and accumulate new 
control voltage Tor new channel. 


lupdata[7.0] (bi-di) 


Internal Microprocessor Data bus 


upaddr[2:0] 


Internal Microprocessor Address Bus (only 2-bits re- 
quired) 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upsell 


Internal Address decode output (high = valid for 
OxOc-OxOd) 


upse!2 


Internal Address decode output (high = valid for 0x20- 
0x23) 


te, tdin 


Scan inputs 


Table 6 


Signal 


Description 


age 


Signal - Delta modulated output signal; when integrated . 
by external RC it provides an analogue representation of 
the internal digital "control voltage" valuelnterpolated 
output data 


tdout 


scan outputs 



Table 7 



Address 
(Hex) 


Bit No. 


Dir/Re- 
set 


Register 
Name 


Description 


0x0c- 
OxOd 


15:0 


R/0 


agejevel 


AGC "Control Voltage" (msb's) 


0x20- 
0x21 


15 


R/W/0 


agc_open 


Set to 1 to break AGC control 
loop 


11:0 


R/W/0 


agc_twiddle 


AGC twiddle factor 


0x22- 
0x23 




R/W/0 


agc_loop_bw 


AGC Control loops parameters 



Table 8 
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Signal 


Description 


elk 


40MHz main clock 


nrst 


Active-low synchronous reset 


CIKZUM 


^UlVlriZ. ocU 11 pie UlUuft. \UocU ob d VdllU oiyilctl IvJ II IU luetic 

when input data sample is valid) 


sample[9:0] 


input data sample from ADC. (AGC should ensure that 
this white-noise-like signal is scaled to full dynamic range) 


freq_err[1 1:0] 


Frequency Error input - 1Hz accurate tuning over +/-0.5 
carrier spacing 


IQGI 


Valid pulse for enable frequency error signal. The effect of 
the frequency control loop is held off until a guard interval 
is passing through the IQ Demod block. (IQGI is gener- 
ated by the FFT window and indicates when a guard 
interval is passing). 


te. tdin 


Scan test inputs 


Table 9 


Signal 


Description 


l-data[11:0] 


I data-stream to be low-pass filtered (40 MHZ timing) 


Q-data[11:0] 


Q data-stream to be low-pass filtered (40 MHZ timing) 


valid 


Valid output data indicator: high if data is being output on 
this clock cycle (40 MHZ timing) 


tdout 


Scan test output 


Table 10 . 


Signal 


Description 


elk 


40MHz clock (2x sample clock) 


nrst 


Active-low synchronous reset 


valid_in 


high-pulse indicating valid data from IQ-demodulator 
(40MHz timing) 


i data[11:0], 
q_data[11:0] 


input data from IQ-demodulator (20Msps) 


te. tdin . 


Scan test inputs 


Table 1 1 


Sianal 


Description 


i out[11:0], 
q_out[11:0]- 


Low-Pass filtered output data 
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Signal 


Description 


VcMJU 


uuipui puiatr iiiuioouny vanu Qdia output ^ueoiiiiaieu iu 
10Msps) 


tdout 


Scan test output 


Table 12 


Signal 


Description 


clk40M 


40MHz main clock (2x sample clock) 


valid_in 


input data valid signal; when valid is low, input data 
should be ignored 


i data[11:0]. 
q_data[11:0] 


input data from low-pass filter (decimated to 10Msps) 


sr_err[1 1:0] 


SamplingRate Error feedback fro Freq/Sampiing Error 
block 


SincGI 


Valid pulse for Error signal; effect of Sampling Rate 
contol loop is held off until guard interval is passing 
through Sine Interpolator. FFT Window block generates 
this signal at appropriate time. 


te.tdin 


Scan test signals 


Table 13 


Signal 


Description 


i out[11:0], 
q_out[11:0] 


Interpolated output data 


valid 


Output pulse indicating valid data output) 


tdout 


Scan test output 


Table 14 


Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


valid_in 


input data valid signal; when valid is low, input data 
should be ignored 


i_data[1 1:0} 


input data from front-end (ignore quadrature data for this 
block) . 


resync 


Control signal: forces Sync FSM back to acquisition mode 
when pulsed high 


guard[1:0] 


Expected guard interval; programmed by Host uP to aid fft 
window acquisition. 00 = 1/32, 01 = 1/16, 10 = 1/8, 1 1 = 
1/4 
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Signal 


Description 


lupdata[7:0] (bi-di) 


Internal Microprocessor Data bus (bi-directional) 


upaddr[0] 


Internal uP address bus (only 1-bit required) 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upsel 


Address decode output to select FFT window block 



Signal 


Description 


FFT_Window 


Timing output pulse; low for 2048 samples indicating the 
active interval 


fftjock 


Output puise indicating status of Sync FSM; 1 = Symbol 
acquired 


rx_guard[1:0] 


Received Guard Interval Size: 00 = 1/32, 01 = 1/16, 10 = 
1/8, 11 = Va 


IQGI 


Timing pulse indicating when the guard interval should 
arrive at the IQ demodulator (Frequency Error only cor- 
rected in the Guard Interval) 


SincGI 


Timing pulse indicating when the guard interval should 
arrive at the Sine Interpolator (Sampling Error only cor- 
rected in the Guard Interval) 


sr_sweep[3:0] 


Sampling Rate sweep output; 4-Bit output used by Fre- 
quency and Sampling Error block to generate Sampling 
Rate "ping-pong" sweep during FFT window acquisition. 


Table 16 



Address 
(Hex) 


Bit 
No. 


Dir/Reset 


Register Name 


Description 


0x30- 
0x32 


15 


R/W/0 


lock_fft_window 


Set to 1 to prevent 
fft_window moving in Track- 
ing mode 




14 


R/W/0 


inc_fft_window 


Write. 1 to move fft_window 
position one sample period 
later (one-shot operation) 




13 


R/W/0 


dec_fft_window 


Write 1 to move fft_wmdow 
position one sample period 
earlier (one-shot operation) 




12:0 


R/0 


fft_window 


FFT Window position 
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Address 


Bit 


Dir/Reset 


Register Name 


Description 


(Hex) 


No. 








7:0 


R/W/0 







Table 17 



Signal 



Description 



clk40M 



40MHz clock (2x sample clock) 



nrst 



Synchronous reset (active low) 



valid in 



input data valid signal; when valid is low, input data should 
be ignored 



i_data[11:0], 
q_data[11:0] 



input data from FFT 



symbol 



Symbol timing pulse from FFT; high for first valid data 
value of a new symbol 



Resynchronization input triggered on e.g. channel change. 
Pulsed high to indicate return to acquisition mode (wait for 
first symbol pulse after resync before beginning pilot 
search) 



resync 



lupdata[7:0] (bi-di) 



Internal Microprocessor Databus 



upaddr[0] 



Internal uP address bus (only 1-bit required) 



upwstr 



Internal uP write strobe 



uprstr 



Internal uP read strobe 



upsel 



Internal address decode output: high for addresses 0x032-4x033 



Table 18 



Signal 


Description 


ui data[11:0], 
uq_data[11:0] 


Uncorrected spectrum data, as read from RAM buffer (for 
Frequency/Sampfing Error block) 


u_symbol 


Uncorrected symbol start; high for first carrier of the un- 
corrected symbol 


us__pilot * 


high for any carrier which is a scattered pilot in the uncor- 
rected symbol 


ci date[T1:0]." 
cq_data['11:0] 


Corrected spectrum data; as output from the complex 
multiplier 


valid 


high for valid corrected symbol - data carriers only 


bad_carrier 


high if interpolated channel response for the carrier is 
below pre-set fraction of the mean of carriers of previous 
symbol - viterbi will discard the data carried by this carrier 
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Signal 


Description 


c_symbol 


high for the first carrier in the corrected symbol 


c carneru 


hinh fnr thp fir^t ^rtiv^ rarripr in thp pnrrpctsd svmbol (a 

1 IIUI 1 IUI LI Iw III Ol auLIVC OCX 1 1 1^ 1 III 11 IC wl Ibwl&u wjniuwi \ 

continual pilot corresponding to a carrier index value of 0) 


C IfJo fJllvji 


hinh fnr arw rarripr in the* rorreeted svmbol which is a 
TPS pilot 


pilotjock 


output high if pilots successfully located at the end of pilot 
acquisition phase. 


odd_symbol 


high for symbol period if symbol is odd number in frame 
(as determined from scattered pilot phase) 


c_ref e re nce_seq 


Reference sequence output to TPS Sequence block 


freq_sweep[2:0] 


Frequency Sweep control; incrementing 3-bit count which 
increments IQ Demodulator LO offset in Frequency and 
Sampling block. Sweeps 0-0.875 carrier spacing offset in 
0.125 carrier spacing steps 



Table 19 



Address (Hex) 


Bit No. 


Dir/Reset 


Register 
Name 


Description 


0x32- 
0x33 


15 


R/W/0 


set_carrier_0 


Set to 1 to use 
carrier_0 value 
as setting 




11:0 


R/W/0 


carner_0 


Carrier 0 posi- 
tion 


0x36 


7:0 


R/W/ 


csi_thresh 


Channel State 
Information 
threshold - the 
fraction of 
mean level 
below which 
data carriers 
are marked by 
a bad_carrier 
flag. Nominally 
0.2 (for 2/3 
code rate). A 
value of 0 
would turn CSI 
off for compar- * 
ison testing. 


0x37 


7:0 









Table 20 
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Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


ci_data[11:0] 


corrected pilot data from Channel Estimation and Correc- 
iion ^oniy neea i aaia oecause corrected pilots snouio oniy 
insignificant Im component; - only need sign bit) 


ips_puoi 


nign ior smgie ciock cycie wnen oaxa input is a tps pnot - 
use like a valid signal. 




r\citi( ciiuc ocquence rKoo inpux rrom onannei tsumaiion 
& Correction - ignore for non-tps_pilot values 


C SyiTIUUI 


Liiiuny puibt? nign ior i ciock cycie ior iirsi earner in new 
symbol (whether or not that carrier is active) 


lupdata[7:0] (bi-di) 


Internal Microprocessor Databus 


upaddr[1:0] 


Internal uP address bus (only 2-bits required) 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upsel 


Internal address decode output; high for addresses 
0x10-0x13 


Table 21 


Signal 


Description 


tps_data [29:0] 


Output tps data (held static for 1 OFDM frame): 

tps_data[1:0] = frame number 

tps_data[3:2] = constellation 

tps_data[6:4] = hierarchy 

tps_data[9:7] = code rate, HP stream 

tps_data[12:10] = code rate, LP stream 

tps_data[14:13] = guard interval 

tps data[16:15] = transmission mode 

tps_data[29:17] = future use bits 

Note that parameters are transmitted for the next frame; 
outputs should be double-buffered so parameters appear at 
block outputs in the correct frame (used by Demapper and 
Symbol/Bit deinterleave blocks to decode incoming data) 


tps_sync 


Status output from Frame Sync FSM - set to 1 when FSM 
is syne'd i.e when 2 valid sync words have been received- in . 
expected postions AND correct TPS data is available at the 
block outputs. • 



Table 22 



0x10-0x 


TPS Data (including future use bits) 


13 


1:0 


R/0 


tps_frame 


Number of last received com- 










plete OFDM frame in superframe 
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0x10-0x 


TPS Data (including future use bits) 


rS 


3:2 


R/0 


tps_constellation 


Constellation Pattern from TPS 
data 




7:5 


R/0 


tps_alpha 


Hierarchical Transmission Infor- 
mation 




10:8 


R/0 


tps_hp_rate 


Viterbi Code Rate of 

Hinh-Prinritv <itrp3m (\n 

i ii^ii 1 1 1 u 1 1 l y on ecu 1 1 V'*' 

non-hierarchical mode this is the 
code rate of the entire stream) 




13:11 


R/0 


tps_lp_rate 


Viterbi Code Rate of Low-Priority 
stream 




15:14 


R/0 


tps_guard_int 


Guard Interval 




17:16 


R/0 


tps_tx_mode 


Transmission Mode 




31:19 


R/0 


tps_future 


Undefined bits allocated for fu- 
ture use 



Table 23 



Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


nrst 


Active low reset 


us_pilot 


input data valid signal; high when a scattered pilot is 
output from the Channel Estimation & Correction block 


guard[1:0] 


Guard Interval from which symbol period Tt can be 
deduced:00 = 1/32 (Tt = 231us) , 01 = 1/16 (238us) t 10 = 
1/8 (252us) ,11 = 1/4 (280us) 


ui data[11:0], 
uq_data[11:0] 


input data from Channel Estimation & Correction (Uncor- 
rected spectrum) 


u_symbol 


Symbol timing pulse from Channel Estimation & Correc- 
tion; high for first valid data value of a new symbol (uncor- 
rected spectrum) 


resync 


Resynchronization input triggered on e.g. channel 
change. Pulsed high to indicate return to acquisition mode 
(wait for first symbol pulse after resync before beginning . 
Pilot search). 


sr_sweep[3\0] * 


Sampling Rate Sweep control from FFT Window- block; 0 

= 0Hz offset, 1=+500Hz, 2=-500Hz,3=+1000Hz, 

4=-1 000Hz,5=+1 SOOHz^—l 500Hz,7=+2000Hz,8=-2000H 

z 


freq_sweep[3:0] 


Frequency Sweep control from Channel Estimation & 
Correction block; represents number n range 0-7 fre- 
quency offset = nxSOOHz 
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Signal 


Description 


lupdata[7:0) (bi-di) 


Internal Microprocessor Databus 


upaddr[3.0] 


Internal uP address bus (only 4-bit required) 


upwstr 


Internal uP write strobe 


uprstr 


Internal uP read strobe 


upseM 


Internal address decode output; high for addresses OxOe- 
OxOf 


upsel2 


Address decode for addresses in range 0x24-0x2d 



Tabie 24 



Sianal 


Description 


frequency_error 


frequecy error output (to IQ Demod) 


sampling_rate_error 


Sampling Rate Error output (to Sine Interpolator) 


freqjock 


status output; high if frequency. error low 


samplejock 


status output; high if sampling rate error low 



Table 25 



Address (Hex) 


Bit No. 


Dir/Reset 


Register 
Name 


Description 


OxOe- 
OxOf 


11:0 


R/0 


freq_error 


IQ Demodu- 
lator Fre- 
quency Error 
(from feed- 
back loop) 



Table 26 



Address (Hex) 


Bit No. 


Dir/Re- 
set 


Register Name 


Description 


0x24- 
0x25 


15 


R/W/0 


freq_open 


Set to 1 to break freq 
control loop 


14 ' 


R/W/0 


freq_nogi 


Set to 1 to allow fre- 
quency update anytime, 
not just during Guard - 
Interval 


11:0 


R/W/0 


freq_twiddle 


IQ Demod twiddle factor 


0x26- 
0x27 






freqJoop_bw 


Frequency Control Loop 
parameters 


0x28- 
0x29 


15 


R/W/0 


sample_open 


Set to 1 to break sample 
control loop 



9NSDOOD' <WO 9Si94tOAJ?. ! 



WO 98/19410 


• 




• 

68 


FCT/US97/189U 


Address (Hex) 


Bit No. 


Dir/Re- 
■ set 


Register Name 


Description 




14 


R/W/0 


sample_nogi 


Set to 1 to allow sample 
update anythime, not 
just during Guard Inter- 
val 




-i -i * n 
1 1 .U 


K/W/U 


sample_twiddie 


oampiing Kate iwiaaie 
factor 


0x2a- 
0x2b 




K/VV/U 


sampie_Joop__bw 


oampiing Kate L/ontroi 
Loop parameters 


0x2c- 
0x2d 


1 1:0 


K/0 


sampling_rate_err 


Sampling Rate Error 
(from feedback loop) 



Table 27 



Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


vaiidjn 


input data valid signal; when valid is low, input data 
should be ignored 


|i_data[11:0], q_data[11:0] 


input data from Channel Estimation & Correction. 


bad_carrier_in 


Carrier Status falg - set if carrier falls below accept- 
able level; indicates to viterbi that data from this car- 
rier should be discarded from error correction calcu- 
lations. 


c_symbol 


Timing synchronization signal - high for the first data 
sample in the corrected COFDM symbol. 


constellation[1 :0] 


control signal which defines constellation: 00 = 
QPSK, 01 = 16-QAM, 10 = 64-QAM 


alpha[2:0] 


control signal defining hierarchical transmission pa- 
rameter, alpha: 000 = non-hierarchical transmission, 
001 = alpha value of 1. 010 = alpha value of 2, 01 1 = 
alpha value of 4 (Note the first release of the chip will 
not support hierarchical transmission) 



Table 28 



Signal 


Description 


out_data[11:Q] 


deinterleaved output data 6 I,-6 Q format ... 


bad_carrier 


bad_carrier flag carried through demap process un- 
changed. 


valid 


Valid output data indicator; high if data is being output on 
this clock cycle 
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Signal 


Description 


d symbol 


Symbol timing pulse re-timed to synchronize with out_data 


Table 29 


Signal 


Description 


clk40M 


40MHz clock (2x sample clock) 


valicMn 


input data valid signal; when valid is low, input data should 
be ignored 


demap_data[11:0] 


input data from Demapper. Data is in 6-bit I, 6-bit Q format 
(for 64__QAM) 


had rarrier in 


Carrier status sianal - set if carrier falls below limits* indi- 
cates to viterbi that data should be ignored. Carried with 
data as extra bit through deinterleaver store. 


symbol 


Timing synchronization signal - high for the first data sam- 
ple in a COFDM symbol. Used to resynchronize address 
generation 


carrierO 


Timing pulse - high for the first active carrier (correspond- 
ing to carrier index value of 0) in a symbol 


odd_symbol 


high if symbol is odd number in the frame (different inter- " 
leaving pattern in odd and even symbols within 68-symboL". 
frame) 



Table 30 



Signal 


Description 


out_data[11:0] 


deinterleaved output data coded constellation format 


bad_carrier 


Bad carrier output having passed through deinterleave 
RAM. 


valid 


Valid output data indicator; high if data is being output on 
this clock cycle 


d_symbol 


Output timing synchronization signal - high for first data 
sample in de-interleaved COFDM symbol. 



Table 31 



Signal Description 


clk40M 


40MHz clock (2x sample clock) 


valid_in 


input data valid signal; when valid is low, input data 
should be ignored. Valid "spread out" to smooth out data 
rate over whole symbol - average of 1 data valid every six 
40MHz cycles. Effective data rate at viterbi input dropped 
to 20MHz 


sdi_data[11:0] 


input data from Symbol Deinterleaver. Data is in 6-bit I. 
6-bit Q format (for 64_QAM) 
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Signal 


Description 


bad_carrier 


Set to 1 if a carrier conveying the data fell below 
cceptable limits; indicates to Viterbi that this data should 
oe ignoreo 


symbol 


Timing synchronization signal - high for the first data 
sample in a COFDM symbol. Used to resynchronize .ad- 
dress generation 


constellation[1:0] 


Constellation Type indicator: 10 = 64-QAM01 = 16-QAM00 
= QPSK 


alpha[2:0] 


Hierarchical transmission control:000 = non-hierarchical, 
001 = alpha value 1, 010 = alpha value 2, 01 1 = alpha 
value 4(Note: in this first version of the device only 
non-hierarchical mode is supported) 


Table 32 


Signal 


Description 


l-data[2:0] 


I soft-bit to Viterbi 


discard-l 


flag bit drived from bad_carrier signal; viterbi will ignore 
this soft-bit if set. (bad-carrier is repeated per soft-bit be- 
cause of interleaving) 


Q-data[2:0] 


Q soft-bit to Viterbi 


discard-Q 


flag-bit; Viterbi will ignore this soft-bit if set 


valid 


Valid output data indicator: high if data is being output on 
this clock cycle 


Table 33 


Signal 


Description 


MD[7:0] (bi-di) 


Microprocessor Data bus (bi-directional) 


MA[5:0] 


Microprocessor Address Bus 


MR/W 


Microprocessor Read / Write control 


SCL 


Serial Interface Clock 


SDA(bi-di) 


Serial Interface Data I/O (bi-directional - same pin as 
MQ[0]) 


SADDR[2:0] 


Serial Interface Address 


S/P ' 


Serial/Parallel interface select 



Table 34 



Signal 


Description 


nupdata[7:0] (bi-di) 


Internal processor data bus (inverted) (bi-directional) 
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Signal 


Description 


upaddr[5.0] 


Internal address bus (decoded to provide individual se- 


lects for various register banks within functional blocks) 


upgrstr 


Internal read strobe 


upgwstr 


Internal write strobe 


IRQ 


Interrupt Request (Active low. open collector) 



Table 35 



Signal 


Description 


pau LJKHU 


\J 1 IUUI III L/ilGU HUlvinZ. L/lUUf\ IfUlli llipUL [JdU 


lupdata[7:0] (bi-di) 


Internal Microprocessor Data bus (bi-directional) 


upaddr[3:0] 


Internal Microprocessor Address Bus (only bits relevant to 

rnn i c to rc VAyithin Qi/ctom r\ ntrn 1 ^ 
itjyioicio wiuiiii oysicrn v^unuuij 


uprstr 


Internal Microprocessor Read strobe 


upwstr 


Internal Microprocessor Write Strobe 


upsell 


block select decoded from microprocessor interface (1 = 
access to this block enabled) valid for addresses 
OxOO-OxOb 




address decode for 0x38-0x39 ranae 


tns dataMO'Ol 


TPS data received in OFDM frame (VO = 
tps_constellation; 4:2 = tps_alpha7:5 = tps_hp_rate10:8 = 
ips_ip_rate > )\uon t ootner witn v^uara interval - inese 
parameters only affect back end blocks) 


rs_correct[o.uj 


L/Ouni or oils correcieu in eacn ko pacKex ^accumuiaieu 
over 1 second for BER value) 


rs_corr_val 


Valid pulse; high when rs_correct value is valid 


pkt_err 


Set to 1 to indicate RS packet is uncorrectable; has >64 
bit errors or is corrupted in some other way. 


err_val 


Set to 1 to indicate when pkt_err signal is valid 


vit_ill_state 


ViterbMllegal state pulse; (accumulate to give Viterbi 
illegal state count) 


vit_ill_val 


NOW NOT REQUIRED - Viterbi illegal state valid pulse 


vit_sync • 


Status signal - 1 if Viterbi is synchronized 


tps_sync 


Status signal - 1 if TPS is synchronized 


pilotjoc 


Status signal - 1 if pilot location completed successfully 
(found__pilots)) 


fft_loc 


Status signal - 1 if FFT window has located correctly 


vit_rate[2:0] 


Received Viterbi puncture rate. 
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Signal 




tck 


JTAG- test clock - used for control of clock in test mode 


nj reset 


JTAG test reset - for clock control block 


jshift 


JTAG test register shift control - for clock control block 


j_ctrl_in 


JTAG test data input 


Table 36 


Signal 


Description 


clk40 


Test-controlled main clock 


clk20 


Test-controlled sample clock (input to IQ Demod and 
AGC) 


lupdata[7:0] (bi-di) 


Internal processor data bus (bi-directional) 


nirq 


Active Low interrupt request bit (derived from chip_event) 


constellation[1:0] 


Internal address bus (decoded to provide individual se- 
lects for various register banks within functional blocks) 


alpha[2:0] 


Hierarchical mode information 


hp_rate[2:0] 


Viterbi code rate for High Priority channel (in 
non-hierarchical mode this is the code rate for the com- 
plete channel) 


lp_rate[2:0] 


Viterbi code rate for Low Priority channel. 


upi_tx_mode[1 :0] 


Transmission mode (2K or 8K) 


upi_guard[1:0] 


Guard Interval 


rvn V^liH 


otu iu i it nubi inierrace nas sei rx para oaia - useo as a 
"valid" signal for rx_para data (in case of TPS data use 
tps_sync) 


o__clk_phase 


Control line; set to 1 to invert output clock phase 


xtc[2:0] 


Externa! Tuner Control bits 


i2c_gate 


I2C "Gate" control 


tsjri 


Transport Stream Interface tristate control 


soft_reset 


Software Reset (set to 1 to reset everything except upi)-- 


agc_invert. 


Control line: set to 1 to invert sense of AGC sigma-delta 
output (default: low output equates to low AGC gain) 


agc_resync 


Control line: When set low AGC held in initial condition. 
Resync transitioning high commences the AGC acquisi- 
tion sequence 
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Signal 


Description 


fftj-esync 


Control line: hold low to re-initialise FFT, Channel Estima- 
tion & Correction, Frequency/Sampling Error and TPS 
blocks. Transition high commences FFT window locate, 
Pilot locate and TPS synchronisation. 


viterbi__resync 


Contol line; hold low to re-initiliase FEC backend. Transi- 
tion high commences Viterbi synchronisation. 


j_ctrl_out 


JTAG test data output - from clock control block. 



Table 37 



Address 
(Hex) 


Bit No. 


Dir/Reset 


Register Name 


Description 


0x00 


Event Reg. 




0 


R/W/0 


chip_event 


OR of all events which 
are interrupt-enabied 
(unmasked) 




1 


R/W/0 


lock_failed_event 


Set to 1 if channel ac- 
quisition sequence fails - 




2 


R/W/0 


rs_overload_event 


Set to 1 if 

Reed-Solomon Decoder 
exceeds set threshold 
within one 1 second pe- 
riod 


0x01 


Mask Reg. 




0 


R/W/0 


chip_mask 


Set to 1 to enable IRQ 
output 




1 


R/W/0 


lock_failed_mask 


Set to 1 to enable inter- 
rupt on channel acquisi- 
tion fail 




2 


R/W/0 


rs_overload_mask 


Set to 1 to enable inter- 
rupt on RS error thresh- 
old exceeded 


0x02 


Status Reg. 




0 


R/0 


systemjocked 


Set to 1 when system 
acquired channel suc- 
cessfully 




1 


R/0 


viterbi_sync 


Set to 1 when Viterbi is : 
synchronized 




2 


R/0 


tps_sync 


Set to 1 when OFDM 
frame carrying TPS data 
has been synchronized 
to- 
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Address 
(Hex) 


Bit No. 


Dir/Reset 


Register Name 


Description 




3 


R/0 


pilotjoc 


Set to 1 when pilots in 
COFDM symbol have 
been located and syn- 
chronized to 




4 


R/0 


fftjoc 


Set to 1 when guard 
interval has been lo- 
cated and synchronized 
to. 




7:5 


R/1 


viterbi_rate 


Received Viterbi Code 
rate 


0x04-0x0 
5 


Control Reg: 




0 


R/W/0 


change_channel 


When set to 1 , holds 
device in "Reset" state. 
Clearing this bit initiates 
channel change. 




1 


R/W/0 


agc_invert 


Invert AGC Signa-Delta 
output. Default setting 
means low output asso- 
ciated with reduced 
AGC gain. 




2 


R/W/0 


o_clk_phase 


Set to 1 to invert phase 
of output clock. Default 
condition: output data 
changes on falling edge 
of output clock. 




3 


R/W/0 


set_rx_parameters 


Set to 1 to take Reciver 
Parameter Data from 
Receiver Parameter 
Register. Default condi- 
tion: settings taken from 
TPS data (longer chan- 
nel acquisition time) 




4 


R/W/0 


extend_agc 


Set to 1 to hold acquisi- 
tion sequence in 
agc_acquire state 




5 


R/W/0 


extend_fs 


Set to 1 to hold acquisi- 
tion sequence in * 
fs_acquire state 




6 


R/W/0 


extend_settle 


Set to 1 to hold acquisi- 
tion sequence in 
fs_settle state 
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Address 
(Hex) 


Bit No. 


Dir/Reset 


Register Name 


Description 




7 


R/W/0 


extend_syn 


When set to 1 to hold 
acquisition sequence in 
vit_sync state 




10:8 


R/W/0 


xtc 


External Tuner Control 
bits (external pins 
XTC[2:0]) 




11 


R/W/0 


i2c_gate 


I2C "Gate" signal; set- 
ting this to 1 enables the 
isolation buffer between 
the "processor side" I2C 
bus and the "Tuner side" 
I2C so the processor 
can acces a Tuner 
through COFDM device. 
Setting to 0 closes the 
"gate" to prevent I2C 
bus noise affecting deli- 
cate RF. 




12 


R/W/0 


ts_tri 


Transport Stream 
Tristate control - set to 1 
to tristate MPEG TS in- 
terface (eg. to mux a 
QPSK devce to same 
MPEG demux). 
Power-on state of TS 
output controlled by ex- 
ternal pin - somehow!!! 




13 


R/W/0 


fast_ber 


Set to 1 to reduce BER 
counter, vit_ill_state 
counter and 
rso_counter, counter 
periods from 1 sec to 
100ms 




15 


R/W/0 


soft_reset 


Software Reset - set to 
1 to reset all blocks ex- 
cept upi. Set to 0 to re- 
lease. 


0x06-0x0 . 
7 


Receiver Parameter Register: 




15:14 


R/W/2 


upi_constellation 


Constellation Pattern for 
Demapper and Bit 
Deinterleaver (reset con- 
dition = 64-QAM) 




13:12 


R/W/0 


upi_guard 


Guard Interval: 00 = 
1/32, 01 = 1/16, 10 = 
1/8, 11 = 1/4 
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Address 
(Hex) 


Bit No. 


Dir/Reset 


Register Name 


Description 




11:9 


R/W/0 


upi_alpha 


Hierarchical Tranmission 
Mode or "alpha value" 
(reset condition = 
non-hierarchical mode) 




7:5 


R/W/0 


upi_hp_rate 


Viterbi Code Rate for HP 
stream - in 

non-hierarchical mode 
this is taken as the 
Viterbi Code Rate (reset 
condition = 1/2 rate 
code) 




4:2 


R/W/0 


upijp_rate 


Viterbi Code Rate for LP 
stream (reset condition 
= 1/2 rate code) 


1:0 


R/W/0 


upi_tx_mode 


Trnnsmission mode 
(00=2K, 01=8K, others 
reserved) 


0x08 


7:0 


R/W/0 


rsojimit 


Errored packet per sec- 
ond limit (for 
rs__overload_event bit) 


0x09 


7:0 


R/0 


rso_count 


Count of Uncorrectable 
Transport Packets per 
second (saturates at 
255). Write to register to 
latch a stable count 
value which can then be 
read back. 


OxOa 
- OxOb 


15:0 


R/0 


ber 


BER (before RS) de- 
duced from RS correc- 
tions in 1 second period 
- max correctable bit 
errors -1 .35M/sec for 
7/8, 64-QAM, 1/32 Gl 
(equivalent to 43.e-3 
BER assuming useful 
bitrate of 31.67 e6). 
Only top 16 bits of 21 bit 
counter are visible - res- 
olution of ~1e-6 depend- 
ing on code-rate; con- 
stellation Gl length. 
Write to register to latch 
a stable count value 
which can then be read 
back. 



Table 38 
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0x38-0x39 


11:0 


R/0 


vitjll_states 


Viterbi Illegal State Rate 










(per second) Write to 










register to latch count 










which can then be read 










back 



Table 39 
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Listing 1 

// Sccsld: %W% %G% 

r **************^^ * 

5 Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Atam. 

Description: Verilog code for butterfly processor BF2I (RTL) 

10 

Notes : Computes first stage in radix 4 calculation. 

15 'timescale 1ns / 100ps 

module fft_bf2l (elk, enable_1, in_x1r, in_x1i, in_x2r, in_x2i, in_s, 
out_z1r, out_z1i, out_z2r, out_z2i, out_pvf); 

20 parameter wordlength = 5; // Data wordlength. 

input elk, // Master clock. 

enable_1 , // Enable on clock 3. 

/* in_s; // Control line. 

25 input [wordlength-1:0] in_x1r, // Input I from memory. 

in_x1 i, // Input Q from memory. 
in_x2r, // Input I stage n-1. 
in_x2i; // Input Q stage n-1 . 

30 output out_ovf; // Overflow flag. 

output [wordlength-1:0] out_z1r, // Output I to stage n+1 
out_z1i, // Output Q to stage n+1 
out_z2r, // Output I to memory. 
out_z2i; // Output Q to memory. 

35 

wire [wordiength-1:0] in_x1r, 
in_x1 i, 
in_x2r, 
in_x2i, 

40 out_z1r, 
out_z1i, 
out_z2r ( 
out_z2i; 
wire in_s, 
45 enable_1, 
out_ovf ; 

reg [wordlength-1 :0] z1r_tmp1, 
z1i_tmp1, 
50 z2r_tmp1, 
z2i_tmp1, 
z1 r_tmp2, 
z1i_tmp2, 
z2r_tmp2, 




WO 98/19410 



PCT/US97/18911 



5 



10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



z2i_tmp2; 
reg ovMmp, 
ovMmpO, 
ovf_tmp1 ( 

ovf_tmp2, 

ovMmp3, 
ex_regO, 

ex_reg 1 , 

ex_reg2, 

ex_reg3; 

always @(in_s or in_x1r or in_x1i or in_x2r or in_x2i) 
begin 

{ex_reg0,z1r_tmp1} = in_x1r + in_x2r; 

ovfJmpO = in_x1r[wordlength-1] && // Overflow check. 

in_x2r[wordlength-1] && 

-z1r_tmp1 [wordlength-1] || 
Hn_x1r[wordlength-1] && 
-in_x2r[wordlength-1] && 
z1 r_tmp1 [wordlength-1 ]; 
if (ovMmpO) // Saturate logic. 

z1r_tmp1 = (ex_regO) ? {1'b1,{wordlength-1{rb0}}} : 
{rb0,{wordlength-1{1'b1}}}; 

{ex_reg1,z1i_tmp1} = in_x1i + in_x2i; 

ovMrnpl = in_x1i[wordlength-1] && // Overflow check 

in_x2i[wordiength-1] && 
~z1Ltmp1 [wordlength-1] || 
Hn_x1i[wordiength-1] && 
Hn_x2i[word length- 1] && 
z1 i_tmp 1 [wordlength-1 ]; 
if (ovf_tmp1 ) // Saturate logic. 

z1i__tmp1 = (ex_reg1) ? {1'b1 ,{wordlength-1{1'b0}}} : 
{rb0,{wordlength-1{rb1}}}; 

{ex_reg2,z2r_tmp1} = in_x1r - in_x2r; 

ovf_tmp2 = in_x1r[wordlength-1] && // Overflow check. 

-in_x2r[wordlength-1] && 

-z2r_tmp1 [wordlength-1] || 
Hn_x1 r[wordlength-1 ] && 
in_x2r[wordlength-1] && 
z2r_Jmp1 [wordlength-1]; 
if (ovf_tmp2) // Saturate logic. 

z2rjmp1 = (ex_reg2) ? {1'b1 ,{wQrdlength-1{1'bO}}} * 
{1 *b0,{wordlength-1{1 'b1}}}; 

{ex_reg3,z2i_tmp1} = in_x1i - in_x2i; 

ovf_tmp3 = ih_xti[wordlength-1] && // Overflow check 

Hn_x2i[wordlength-1] && 
~z2i_tmp1 [wordlength-1] || 
Hn_x1i[wordiength-1] && 
in__x2i[wordlength-1] && 
z2i_trnp1 [wordlength-1]; 
if (ovf_tmp3) // Saturate logic. 

z2i_tmp1 = (ex_reg3) ? {1'b1 , {wordlength-1 {1'bO}}} ■ 
{1t>b,{wordlength-1{rb1}}}; 
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// Output stage with two channel mux. 
if (!in_s) 

begin: mux__passthru 
5 z1r_tmp2 = in_x1r; 

z1i_tmp2 = in_x1i; 
z2r_tmp2 = in_x2r; 
z2i_tmp2 = in_x2i; 
end 

10 else 

begin: mux_computing 
z1 r_tmp2 = z1 r__tmp1; 
z1i_tmp2 = z1i_tmp1; 
z2r_tmp2 = z2r_tmp1; 
1 5 z2i_tmp2 = z2i_tmp1 ; 

end 
end 

assign out_z1r = z1r_tmp2; 
20 assign out_z1 i = z1 i_tmp2; 
assign out__z2r = z2r_tmp2; 
assign out_z2i = z2i__tmp2; 

always @(posedge elk) 
25 if (enable_1 ) // Butterfly completes at the end of clock cycle 0. 

ovMmp <= in_s && (ovMmpO 1 1 ovf_tmp1 1 1 ovf_tmp2 j i ovf_tmp3); 

assign out_ovf = ovMmp; 

30 'ifdef OVERFLOWJDEBUG_LOW_LEVEL 

// Debug code to display overflow output of a particular adder. 

// Concurrently monitor overflow flag and halt on overflow. 

always @(ovf_tmp or ovMmpO or ovMrnpl or ovf_tmp2 or ovf_tmp3) 

if (ovMmp) 
35 begin 

if (ovMmpO) $display("ovf_tmp0 on BF2I = h ,ovMmp0); 
if (ovfjmpl) $display("ovf_tmp1 on BF2I = ovMrnpl); 
if (ovf_tmp2) $display("ovf_tmp2 on BF2I = '\ovf_tmp2); 
if (ovf_tmp3) $display( M ovf_tmp3 on BF2I = n ,ovfJmp3); 
40 Sstop; 
end 
endif 
endmodule 

45 

Listing 2 

// Sccsld: %W% %G% 

r ***********„««„********„**********««*„^»^ #w ^ M . M . *********** 

50 Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

Description: Verilog code for butterfly processor BF2II. (RTL) 

55 

Notes : Computes second stage in radix 4 calculation. 
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'timescale 1ns / 100ps 

5 module fft_bf2ll (elk, enable_1, in_x1r, in_x1i, in_x2r ( in_x2i, in_s, in__t, 
out_z1r, out_z1i, out_z2r, out_z2i, out_ovf); 

parameter wordiength = 5; // Data wordlength. 

10 input elk, // Master clock. 

enable_1 , // Enable on clock 3. 

in_s, // Control line, 

in t; // Control line, 

input [wordlength-1:0] in_x1r, // Input I from memory. 

1 5 in_x1 i, // Input Q from memory. 

in_x2r, // Input I stage n-1 . 

in_x2i; // Input Q stage n-1 . 

output out_ovf; // Overflow flag. 

20 output [wordlength-1 :0] out_z1 r, // Output I to stage n+1 

out_z1i, // Output Q to stage n+1 

out_z2r, // Output I to memory. 

out_z2i; // Output Q to memory. 

25 wire [wordlength-1 :0] in_x1r, 
in_x1i, 
in_x2r, 
in_x2i, 
out_z1r, 
30 out_z1i, 
out_z2r, 
out_z2i; 
wire in_s, 
in_t, 

35 enable_1, 
out_ovf, 
control; 

reg [wordlength-1 :0] z1 r_tmp1 , 
40 z1i_tmp1, 
z2r_tmp1, 
z2i_tmp1, 
z1rjmp2, 
z1i_tmp2, 
45 z2rjmp2, 
z2i_tmp2, 
x2ri_tmp1, 
x2ri_tmp2; 
reg ovfjmp, 
50 ovMmpO, 
ovMmpl. 
ovf_tmp2, 
ovf_tmp3, 
ex_reg0, 
55 ex_reg1 t 
ex_reg2, 
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ex_reg3; 

assign control = in_s && !in_t; 

5 always @(in_s or control or in_x1r or in_x1i or in_x2r or in_x2i) 
begin 

// Crosspoint switch, used in computing complex j values, 
if (control) 

begin: switch_crossed 
10 x2ri_tmp1 = in_x2i; // i -> r. 

x2ri_tmp2 = in_x2r; // r -> i. 
end 
else 

begin: switch_thru 
15 x2ri_tmp1 = in_x2r; // r -> r. 
x2ri_tmp2 = in_x2i; // i -> i. 
end 

{ex__reg0,z1r_tmp1} = in_x1r + x2ri_tmp1; 
20 ovMmpO = in_x1r[wordlength-1] && // Overflow check. 

x2ri_tmp1[wordlength-1] && 
-z1r_tmp1[wordlength-1] || 
Hn_x1r[wordlength-1] && 
-x2ri_tmp1[wordlength-1] && 
25 z1 r_tmp1 [wordlength-1 ]; 

if (ovf_tmp0) // Saturate logic. 

z1r_tmp1 = (ex_reg0) ? {1'b1 , {wordlength-1 {1'b0}}} : 
{1 *b0,{wordlength-1 {1'b1 }}}; 

30 {ex_reg1,z1i_tmp1} = (control) ? in_x1i - x2ri_tmp2:in_x1i + x2ri__tmp2; 
ovf_tmp1 = in_x1i[wordlength-1] && // Overflow check, 

(control A x2ri_tmp2[wordlength-1]) && // Deals with a 

-z1i_tmp1[wordiength-1] 1 1 // +/- input. 
Hn_x1i[wordlength-1] && 
35 -(control A x2ri_tmp2[word length- 1]) && 

z1 i__tmp1 [word length- 1 ]; 
if (ovf_tmp1) // Saturate logic. 

z1i_tmp1 = (ex_reg1) ? {1'b1 ,{wordlength-1{rb0}}} : 
{rb0,{wordlength-1{1'b1}}}; 

40 

{ex_reg2,z2r_tmp1} = in_x1r - x2ri_tmp1; 

ovMmp2 = in_x1r[wordlength-1] && // Overflow check. 

~x2ri_tmp1 [word length- 1] && // Deals with a 

~z2r_tmp1 [wordlength-1] 1 1 // - input. 
45 ~in_x1r[wordlength-1] && 

x2ri_tmp1 [wordlength-1 ] && 

z2r_tmp1 [wordlength-1]; 
if (ovMmp2) // Saturate iogic. 

z2r_tmp1 = (ex_reg2) ? {1'b1 ( {wordlength-1{1'b0}}} : 
50 {1 'b0,{wordlength- 1 {1 'b 1 }}}; 

{ex__reg3,z2i_imp1} = (control) ? in_x1i + x2ri_tmp2:in_x1i - x2ri_tmp2; 
ovf_tmp3 = in_x1i[wordlength-1] && // Overflow check. 

-(control A x2ri_tmp2[wordlength-1]) && // Deals with a 
55 -z2i_tmp1 [wordlength-1] 1 1 '//-/+ input. 

Hn_x1i[wordlength-1] && 
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(control A x2ri_tmp2[wordlength-1]) && 
z2i_tmp1[wordlength-1]; 
if (ovfJmp3) // Saturate logic. 

z2i_tmp1 = (ex_reg3) ? {1'b1 ,{wordlength-1{1'b0}}} : 
5 {1 'b0,{wordlength-1 {1 'b 1 }}}; 

// Output stage with two channel mux. 
if (!in_s) 

begin: mux_passthru 
10 z1r_tmp2 = in_x1r; 

z1i_tmp2 = in_x1i; 

z2r_tmp2 = x2rijmp1; 

z2i_tmp2 = x2ri_tmp2; 
end 

15 else 

begin: mux_computing 
z1r_tmp2 = z1r__tmp1; 
z1 i_tmp2 = z1 i_tmp1 ; 
z2r_tmp2 = z2r_tmp1; 
20 z2i_tmp2 = z2i_tmp1 ; 

end 
end 



25 



35 



assign out_z1r = z1r_tmp2; 
assign out_z1i = z1i_tmp2; 
assign out_z2r = z2r_tmp2; 
assign out_z2i = z2i_tmp2; 



30 always @(posedge elk) 

if (enable_1) // Butterfly completes at the end of clock cycle 0. 
ovMmp <= in_s && (ovMmpO i | ovMrnpl 1 1 ovMmp2 J | ovMmp3); 



assign out_ovf = ovMmp; 



'ifdef OVERFLOWlDEBUG_LOW_LEVEL 
// Debug code to display overflow output of a particular adder. 
// Concurrently monitor overflow flag and halt on overflow. 
40 always @(ovf_tmp or ovMmpO or ovf_tmp1 or ovf_tmp2 or ovf_tmp3) 
if (ovMmp) 
begin 

if (ovMmpO) $display( M ovf_tmpO on BF2II ='" f ovMmp0); 
if (ovMrnpl) $display( M ovMmp1 on BF2II = '\ovMmp1); 
45 if (ovf_tmp2) $display("ovf_tmp2 on BF2II = n ,ovMmp2); 

if (ovf_tmp3) $display("ovf_tmp3 on BF2II = M ,ovMmp3); 
Sstop; 
end 
'endif 
50 endmodule 



Listing 3 

// Sccsld: %W% %G% 
55 /* ******** ******* 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
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Author : Dawood Alam. 

Description: Verilog code for.a variable size ROM with complex data store. 
(RTL) 

5 

Notes : Used to store complex Twiddle factors. 
********** * ** ***************** * 

10 'timescale 1ns / 100ps 

module fft_rom (elk, enable_3, address, rom_data); 

parameter c__wordlength = 1 ; // Coeff wordlength. 
15 parameter rom_AddressSize = 1; // Address size. 

parameter FILE = ,, ../../../fft/src/lookup_tables/lu_10bit_2048pt_scaleX ,, ; 
// Lookup tab filename. (Listings 16, 17) 

input elk, 
20 enable_3; 

input [rom_AddressSize-1 :0] address; 

output [c_wordlength-1:0] rom_data; 

25 reg [c_wordlength*2-1:0] rom [0:(1 « rom_AddressSize)-1]; 
reg [c_wordiength*2-1:0] b_tmp1, 
rom_data; 

always @(address) 
30 b__tmp1 = rom[address]; 

always @(posedge elk) 
if (enable_3) 
rom_data <= b__tmp1; 



35 



40 



50 



initial 

$readmemb(FILE, rom); 
endmodule 



Listing 4 



// Sccsld: %W% %G% 
; ************ ***** *************^** w __ „ 

45 Copyright (c) 1997 Pioneer Digital Design Centre Limited 



Author : Dawood Alam. 

Description: Verilog code for variable length single bit shift register. 
Notes : Used to delay pipeline control signals by "length" clocks. 

******** * *********-*.* * * **** y 

55 'timescale 1ns / 100ps " ' 
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module fft_sr_1 bit (elk, enable_3, in_data, out_data); 

parameter length = 1 ; // Shift reg length. 

input elk, // Master clock; 

enable_3; // Enable on clock 3. 
input in_data; // Input data. 

output out_data; // Output data. 

reg shift_reg [length-1:0]; // Shift register. 



wire outdata; 
wire elk, 

15 enable_3; 
integer i; 

always @ (posedge elk) 
if (enable_3) 
20 begin 

for (i = (length-1); i >= 0; i = i - 1) 
if (i == 0) 

shift_reg[0] <= in_data; // Force input to SR. 
else 

25 shift_reg[i] <= shift_reg[i-1]; // Shift data once, 

end 



assign out_data = shift_reg[length-1]; 
endmodule 



Listing 5 



// Sccsld: %W% %G% 
r .*.„**. 

35 Copyright (c) 1997 Pioneer Digital Design Centre Limited 



Author : Dawood Alam. 

Description: Verilog code for a dual-port FIFO. (RTL) 

Notes : Used as a pipeline register to delay address into the address 
decoder. 



7 



"timescale 1ns / 100ps 

module fft_sr_addr (elk, enable_3, in_data, out_data); 

50 parameter wordlength = 1 ; // Data word length l/Q. 
parameter length = 1 ; // Shift reg length. 

input elk, // Master clock; 

enable_3; // Enable on clock 3. 
55 input [wordlength-1:0] in_data; // SR input data. 

output [wordiength-1:0] out_data; // SR output data. 
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reg [wordlength-1 :0] shift_reg [length-1:0]; // Shift register. 

wire [wordlength-1 :0] out_data; 
wire elk, 
5 enable_3; 
integer i; 

always @ (posedge elk) 
if (enable_3) 
10 begin 

for (i = (length-1); i >= 0; i = i - 1) 
if (i == 0) 

shift_jreg[0] <= in_data; // Force input to SR. 
else 

15 shift_reg[i] <= shift_reg[i-1]; // Shift data once, 

end 



20 



25 



assign out_data = shift_reg[length-1]; 
endmodule 



Listing 6 



// Sccsld: %W% %G% 

r Copyright (c) 1997 Pioneer Digital Design Centre Ltd. 
Author : Dawood Alam. 
Description: Verilog code for an signed twiddle factor multiplier. (RTL) 

30 Notes : Single multiplexed multiplier and 2 adders employed to 
perform 3 multiplies and 5 additions. Pipeline depth = 2. 
ar/ai = Complex data, br/bi = Complex coefficient, 
bi +/- br could be pre-calculated in the ROM lookup, however 
in this implementation it is NOT an overhead as this path is 

35 shared by ar + ai. */ 

'timescale 1ns / 100ps 

module fft_complex_mult_mux (elk, c2, in_ar, in_ai, in_br, in_bi, 
40 out_cr, out_ci, out_ovf); 

parameter wordlength = 12; // Data wordlength. 
parameter c_wordlength = 10; // Coeff wordlength. 
parameter mult_scale = 4; // multiplier scalling 
45 // 1 = /4096, 2 = /2048, 

//.3 = /1024, 4 = /512. 

input {wordleflgth-1:0] in_ar; // Data input I. 
in_ai; // Data input Q. 
50 input [c_word length-1 :0] in_br f // Coefficient input I. 
in_bi; // Coefficient input Q. 
input elk; // Master clock, 

input [1 :0] c2; // Two bit count line, 

output out__ovf; // Overflow flag. 

55 output [wordlength-1 :0] out_cr, * // Data output I. — 
out_ci; // Data output Q. 
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wire [wordlength-1:0] in_ar, 
in_ai, 

5 brjmp, 
bi_tmp, 
out_cr, 
out_ci; 

wire [c_wordlength-1:0] in_br, 
10 in_bi; 

wire enable_0, 
enable_1 t 
enable_2, 
enable_3; 
15 wire [1:0] c2; 

reg [wordlength-1:0] in_ai_tmp, 
in_ar_tmp, 

abr_tmp, 
20 abi_tmp, 

abri_tmp1, 

abri_tmp2, 

abri_tmp4, 

coeffjmpl, 
25 mpy_tmp1, 

sum_tmpO, 

sum_tmp1 , 

sum_tmp2, 

acc_tmp, 
30 store_tmp, 

cr_tmp, 

ci_tmp; 

reg [wordlength*2-1:0] abri_tmp3, 
mpy_tmp2, 
35 coeff_tmp2; 
reg ovMmpO, 
ovMrnpl, 
ovf_tmp2, 
ovf_tmp3, 
40 ex_regO, 
ex_reg1, 
c1 ( c3,c4; 

// Enable signals for registers. 
45 assign enable_0 = -c2[1] && -c2[0]; 
assign enable_1 = ~c2[1] '&& c2[0]; 
assign enable_2 = c2[1] && -c2[0]; 
assign enable_3 = c2[1] && c2[0]; 

50 // Sign extend coefficients from c_wordlength bits to wordlength. 

assign br_tmp = {{(wordlength-c_wordlength){in__br[c_wordlength-1]}},in_br}- 
assign bijmp = {{(wordlength-c_wordlength){in_bi[c_wordlength-1]}},'in_bi}; 

// Combinational logic before pipeline register. 
55 always @(in_ar or br__tmp or in_ai or bi_tmp or c2) 
begin 
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d =c2[0] || c2[1]; 
c3 = c2[1]; 

if(!d) 
5 begin 

abr_tmp = in_ar; 
abi_tmp = in_ai; 
end 
else 
10 begin 

abr_tmp = br_tmp; 
abi_tmp = bi_tmp; 
end 

15 if(c3) 

{ex_reg0,abri_tmp4} = abi_tmp - abr__tmp; 
else 

{ex_regO ? abri_tmp4} = abi_tmp + abrjmp; 

20 ovMmpO = abi_tmp[wordlength-1] && // Overflow check. 

(c3 A abr_tmp[wordlength-1]) && // Deals with a 

-abri_tmp4[wordlength-1] |j //+/- input 

-abi_tmp[wordiength-1] && 

-(c3 A abr_tmp[wordlength-1]) && 
25 abri_tmp4[wordlength-1]; 

if (ovfJmpO) // Saturate logic. 

abri_tmp1 = (ex_regO) ? {1'b1 ? {wordlength-1{1'b0}}} : 
{rb0,{wordlength-1{rb1}}}; 

30 else 

abri_tmp1 = abri_tmp4; 

end 

35 // Combinational logic after pipeline register. 

always @(in_ar_tmp or in_ai_tmp or br_tmp or c2 or storejmp or abri_tmp2) 
begin 

c4 = c2[1] && -c2[0]; 

40 case (c2) 
2'bOO: 
begin 

coeff_tmp1 = in_ar_tmp; 
sum_tmp0 = store__tmp; 
45 end 
2'b01: 
begin 
coeff_tmp1 = br_tmp; 
sum_tmpO' = {wordlength-1{1'b0}}; 
50 end 
2'b10: 
begin 

coeffjmpl = in_ai_tmp; 
sum_tmpO = storetmp; 
55 end 
2 f b11: 



10 



40 



55 



WO 98/19410 PCT/US97/1891 1 

89 

begin 

coeff_tmp1 = in_ar_tmp; 
sum_JmpO = store_tmp; 
end 
endcase 

abri__tmp3 = {{wordlength{abri_tmp2[wordlength-1]}} 1 abri_tmp2}; // extnd 
coeffJmp2 = {{wordlength{coeff_tmp1[wordlength-1]}},coeff_tmp1};// extnd 
mpy_tmp2 = (abri_tmp3 * coeff_tmp2); 

mpy_tmp1 = mpyJmp2[wordlength*2-mult_scale:wordlength-(mult_scaie-1)]; 



if (c4) 

{ex_reg1 t sum_tmp2} = sum_tmp0- mpyjmpl - mpyJmp2[wordlength-mult_scale]; 
15 else 

{ex_reg 1 .sum_tmp2} = mpy_tmp 1 + sumJmpO + 
mpy_tmp2[wordlength-mult_scale]; 

ovf_tmp1 = (c4 A mpy_tmp1[wordlength-1]) && // Overflow check. 
20 sum_tmp0[wordlength-1] && // Deals with a 

~sum_tmp2[wordlength-1] 1 1 // +/- input. 
~(c4 A mpy_tmp1[wordiength-1]) && 
-sum_tmp0[wordlength-1] && 
sum_tmp2[wordlength-1 ]; 
25 if (ovf_tmp1) // Saturate logic. 

sum_tmp1 = (ex_reg1) ? {1'b1 ,{wordlength-1{rb0}}} : 
{rbO f {wordlength-1{1'b1}}}; 

else 

sum_tmp1 = sum_tmp2; 
30 end 

// Pipeline registers for l/Q data paths and intermediate registers, 
always @(posedge elk) 
begin 

35 if (enable_2) // Enable on 2nd clock. 

acc_tmp <= sum_tmp1 ; // Temp store. 



if (enable_3) // Enable on 3rd clock. 
cr_tmp <= acc_tmp; // Pipeline reg cr 

if (enable_3) // Enable on 3rd clock. 

ci_tmp <= sum_tmp1 ; // Pipeline reg ci 



if(enable_1) 

45 store_tmp <= sum_tmp1 ; // Temp store, 
if (enable_2) 

in_ar_tmp <;= in_ar; // Reg i/p to mpy. 

50 if (enable_1) 

in_ai_tmp <= in_ai; // Reg i/p to mpy. 



if (enable_0 !| enable_1 |i enable_2) 
abri_tmp2 <= abri_tmp1; // Pipeline reg. 



end 
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// Register ovf outputs before final OR, else whole complex multiplier is 
// treated as combinational, and the intermediate pipeline reg is ignored, 
always @(posedge elk) 
// if (enable_0 \ \ enable__1 1 1 enable_2) 
5 ovf_tmp2 <= ovMmpO; 

always @(posedge elk) 
ovf_tmp3 <= ovMrnpl; 

10 assign out_ovf = ovf_tmp2 1 1 ovMmp3; 

* ifdef OVERFLOW_DEBUG_LOW_LEVEL 
// Debug code to display overflow output of a particular adder. 
// Concurrently monitor overflow flag and halt on overflow. 
15 always @(posedge elk) 
if (out_ovf) 
begin 

if (ovf_tmp2) Sdisplay("ovMmpO on complex multiplier = ",ovMmp2); 
if (ovf_tmp3) $display( ,r ovf_tmp1 on complex multiplier = ",ovf tmp3); 
20 Sstop; " 
end 
'else 
endif 

25 assign out_cr = crjmp; 
assign out_ci = ci_tmp; 

endmoduie 

30 

Listing 7 

// Sccsld: %W% %G% 
35 Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

Description: Verilog code for a dual-port FIFO with complex data store. (RTL) 

40 

Notes : A variable bitwidth FIFO shift register for intermediate l/Q 
calculations. 

45 

'timescale 1ns / 100ps 

module fft_sr_iq (elk, enable_3, in_xr, in_xi, out_xr, out_xi); 

50 parameter wordlength = 1 ; // Data wordlength l/Q. 
parameter length =1; // Shift reg length. 

input elk, // Master clock; 

enable_3; // Enable on clock 3. 
55 input [wordlength-1:0] in_xr, // SR input data, I. 
in_xi; // SR input data, Q. 
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output [wordlength- 1:0] out_xr, // SR output data I. 
out_xi; // SR output data Q. 

reg [wordlength-1 :0] shift_r [length-1 :0]; // SR for I data. 
5 reg [wordlength-1 :0] shiftj [length-1 :0]; // SR for Q data/ 

wire [wordlength-1 :0] out_xr, 

out_xi; 
wire elk, 
10 enable_3; 
integer i; 

always @ (posedge elk) 
if (enable_3) 
15 begin 

for (i = (length-1); i >= 0; i = i - 1) 
begin 
if (i == 0) 
begin 

20 shift_r[0] <= in_xr; // Force input I to SR. 

shift_i[0] <= in_xi; // Force input Q to SR. 
end 
else 
begin 

25 shift_r[i] <= shift_r[i-1J; // Shift data I once. 

shift <= shift_i[i-1]; // Shift data Q once. 

end 
end 
end 

30 

assign out_xr = shift_r[length-1]; 
assign out_xi = shift_i[length-1]; 
endmodule 

35 Listing 8 

//Sccsld: %W% %G% 

; — * ******** 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

40 

Author : Dawood Alam. 

Description: Verilog code for 8 hardwired coefficients in a lookup table, of 
which 4 are unique values. 

45 

Notes : Used to store complex Twiddle factors. 8 point FFT twiddle factor 
coefficients (Radix 4+2). Coefficients stored as non-fractional 
10 bit integers. Real Coefficient (cosine value) is coefficient 
high-byte. Imaginary Coefficient (sine value) is coefficient 
50 low-byte. Coefficient addresses are delayed by a pipeline depth 

of 5, i.e. equivalent to case table values being advanced by 5. 

***** ** ** **** *..** ********* 

55 'timescaie 1ns / 100ps - ■ - 
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module fftJiardwiredJuO (elk, enable_3 t address, out_br, out_bi); 

parameter c_wordlength = 10; // Coeff wordlength. 
parameter rom_AddressSize = 3; // Address bus size 

5 

input elk, 

enable_3; 
input [rom_AddressSize-1:0] address; 

10 output [c_wordlength-1:0] out_br, out_bi; 

reg [c_wordlength*2-1:0] b_Jmp1, 
b_tmp2; 

15 always ©(address) 
case (address) 

3'd6: b_tmp1 = 20'b0000000000_1 000000000; // W2_8 = +0.000000 -1.000000 
3'd0: b_tmp1 = 20^0101 101010^10100101 10; // W1_8 = +0.707107 -0.707107 
3'd2: b_tmp1 = 20'b1010010110_1010010110; // W3_8 = -0.707107 -0.707107 
20 default: b_tmp1 = 20*b01 1111111 1_00G00000Q0;// W0_8 = +1 .000000 -0.000000 
endcase 

always @(posedge elk) 
if (enable J3) 
25 b_tmp2 <= b_tmp1; ^ 

assign out_br = b_tmp2[c_wordiength*2-1 :c_wordlength]; 
assign out_bi = b_tmp2[c_wordlength-1:0]; 

30 endmodule 

Listing 9 



35 // Sccsld: %W% %G% 
j 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



40 



55 



Author : Dawood Alam. 

Description: Verilog code for 32 hardwired coefficients in a lookup table, of 
which 16 are unique values. 



Notes : Used to store complex Twiddle factors. 32 point FFT twiddle 
45 factor coefficients (Radix 4+2). Coefficients stored as 

non-fractional 10 bit integers. Real Coefficient (cosine value) 
is coefficient high-byte. Imaginary' Coefficient (sine value) is 
coefficient low-byte. Coefficient addresses are delayed by a 
pipeline depth of 4, i.e. equivalent to case table values being 
50 advanced by 4. 



'timescale 1ns / 100ps 

module fft_hardwired Jul (elk, enable_3, address, out_br t out_bi); 
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parameter c_wordlength = 10; // Coeff word length, 
parameter rom_AddressSize = 5; // Address bus size. 

input elk, 

enable_3; 
input [rom_AddressSize-1:0] address; 

output [c_wordlength-1:0] out_br, out_bi; 

reg [c_wordlength"2-1:0] b_tmp1 , 
b_tmp2; 

always @(address) 
case (address) 
5'd5. 

5'd14:b_tmp1 = 20 , b0111011001_1100111100;// W02 32 = +0 923880 -0 382683 
5'd6. 

5'd16:b_tmp1 = 20'b0101 101010_10100101 10;// W04 32 = +0 707107-0 707107 

5*d7. ■ " . ' 

5'd18, 

5'd22:b_tmp1 = 20'b001 1 0001 00_1 0001001 11;//W06_32 = +0.382683-0 923880 
5'd8: b_tmp1 = 20'b0000000000_1 000000000;// W08_32 = +0 000000 -1 000000 
5'd9: b_tmp1 = 20'b1 1001 1 1 100_10001001 1 1;// W10 32 = -0 382683 -0 923880 
5'd10, 

5'd24:b_tmp1 = 20'b10100101 10_10100101 10;// W12_32 = -0 707107 -0 707107 
5'd11:b_tmp1 = 20'b1000100111_1100111100;// W14_32 = -0.923880-0 382683 
5'd13:b_tmp1 = 20'b01 1 1 1 101 10_1 1 1001 1 100;// W01 32 = +0 980785-0 195090 
5'd15, 

5'd21:b_tmp1 = 20'b01 101 01010_1011 100100;// W03_32 = +0 831470 -0 555570 
5'd17:b_tmp1 = 20'b010001 1 100_10010101 10:// W05_32 = +0 555570 -0 831470 
5'd19:b_tmp1 = 20'b0001 1001 00_1 000001 010;// W07_32 = +0 195090 -0 980785 
5'd23:b_tmp1 = 20'b1 1 1 00 1 1 1 00_1 00000 1010;// W09_32 = -0 1 95090 -0 980785 
5'd25:b_tmp1 = 20'b1 000001 01 0_1 1 1001 1 100;// W15_32 = -0.980785-0 195090 
5'd26:b_tmp1 = 20'b10001001 1 1_001 1000100:// W18_32 = -0 923880 +0 382683 
5'd27:b_tmp1 = 20'b101 1 100100_01 10101010;// W21_32 = -0.555570 +0 831470 
default: b_tmp1 = 20'b01 1111111 1_0000000000;// W00_32 = +1 .000000 -0.000000 
endcase 

always @(posedge elk) 
if (enable_3) 
b_tmp2 <= b_tmp1; 

assign out_br = b_tmp2[c_wordlength*2-1 :c_wordlength]; 
assign out_bi = b_tmp2[c_wordlength-1:0]; 

endmodule 



Listing 10 

// Sccsld: %W% %G% 

f .. . *. 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 
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Description: Verilog code for 128 hardwired coefficients in a lookup table, 
of which 64 are unique values. 

Notes : Used to store complex Twiddle factors. 128 point FFT twiddle 
factor coefficients (Radix 4+2). Coefficients stored as 
non-fractional 10 bit integers. Real Coefficient (cosine value) 
is coefficient high-byte. Imaginary Coefficient (sine value) is 
coefficient low-byte. Coefficient addresses are delayed by a 
pipeline depth of 3, i.e. equivalent to case table values being 
advanced by 3. 

............ .... .......*.......*..,..„.,„„„ ..........*., 

"timescale 1ns / 100ps 

module fft_hardwired_lu2 (elk, enable_3, address, out_br, out_bi); 

parameter c_wordlength = 10; // Coeff wordlength. 
parameter rom_AddressSize = 7; // Address bus size. 

input elk, 

enable_3; 
input [rom_AddressSize-1 :0] address; 

output [c_wordlength-1:0] out_br, out_bi; 

reg [c_wordlength*2-1:0] b_tmp1, 
b_tmp2; 

always ©(address) 
case (address) 

7'd36:b_tmp1 =20'b01 11111111 
7'd4, 

7'd37:b_tmp1 =20'b01 11111110 
7'd38, 

7 , d68:b_tmp1 =20'b01 11111010 
7'd5, 

7'd39:b_tmp1 =20'b01 11110110 
7"d40:b_tmp1 =20'b01 1 1 1 10001 
7'd6, 
7'd41, 

7'd69:b_tmp1 =20'b01 1 1 101010 
7'd42:b_tmp1 =20'b01 11 100010 
7'd7, 

7'd43:b_tmp1 =20'b01 1101 1001 
7'd44, 

7'd70:b_tmp1 =20'b01 11001111 
7"d8, 

7'd45:b_tmp1 =20'b01 1 1000100 
7'd46:b_tmp1 =20^0110110111 
7'd9, 
7'd47, 

7'd71:b_tmp1 =20'b01 10101010 
7'd48:b_tmp1 =20'b01 1001 1011 
7'd10. 



.1111100111; /AA/01_128=+0.998795 -0.049068 

.1111001110; //W02_128=+0.995185 -0.098017 

.1110110101; //W03_128=+0. 989177 -0.146730 

1110011100; /AA/04_128=+0.980785 -0.195090 
.1110000100; //W05_128=+0.970031 -0.242980 

1101101011; //W06_128=+0.956940 -0.290285 
.1101010100; //W07_128=+0.941544 -0.336890 

.1100111100; //W08_128=+0.9238'80 -0.382683 

.1100100101; //W09_128=+0.903989 -0.427555 

1100001111; //W10_128=+0.881921 -0.471397 
.1011111001; /A/V11 128=+0. 857729 -0.514103 



101 1 100100; //W12_128=+0.831470 -0.555570 
J 01 1001 1 1 1 ; //W13_128=+0.803208 -0.5'9'5699 
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7'd49:b_tmp1 =20'b01 1 0001 100_1 0101 11 011; //W14 128=+0 773010 -0.634393 
7'd50, 

7'd72:b_tmp1 =20'b0101 1 1 101 1 1010101000; //W1 5 128=+0 740951 -0.671559 
7'd11, 

5 7'd51:b_tmp1 =20'b0101101010_1010010110; //W16_128=+0 707107 -0 707107 
7'd52:b_tmp1 =20'b010101 1000 1010000101 ; //W1 7 128=+0.671 559 -0.740951 
7'd12. 
7'd73, 

7'd53:b_tmp1 =20'b01 01 0001 01_1 001 1 1 0100; //W1 8_128=+0 634393 -0 77301 0 
10 7'd54:b_tmp1 =20'b01001 10001_1001 100101 ; //W19 128=+0.595699 -0 803208 
7'd13, 

7'd55:b_tmp1 =20'b01 0001 1 100 1001010110; //W20 128=+0 555570 -0 831470 
7'd74. 

7'd56:b_tmp1 =20'b0100000111_1001001001; //W21 128=+0 514103 -0 857729 
15 7'd14, 

7'd57:b_tmp1 =20'b001 1 1 10001_10001 1 1 100; /A/V22_128=+0 471397 -0 881921 
7 , d58:b_tmp1 =20'b001 101 101 1 10001 10001 ; //W23 128=+0.427555 -0 903989 
7'd15, 
7'd75. 

20 7'd59:b_tmp1 =20"b001 10001 00_1 0001 0011 1; //W24_128=+0 382683 -0 923880 
7'd60:b_tmp1 =20'b0010101 100_1 00001 1 1 10; //W25 128=+0 336890 -0 941544 
7'd16, 

7'd61:b_tmp1 =20'b0010010101 10000101 10; /A/V26 128=+0.290285 -0 956940 
7"d76, 

25 7'd62:b_tmp1 =20'b0001 1 1 1 100_1000001 11 1 ; //W27 128=+0.242980 -0 970031 
7'd17, 

7'd63:b_tmp1 =20'b0001 1001 00_1 000001 010; //W28_128=+0 195090 -0 980785 
7'd64;b_tmp1 =20'b0001 001 01 1_1 0000001 10; //W29 128=+0 146730-0 989177 
7'd18, 
30 7'd77, 

7'd65:b_tmp1 =20'b00001 10010_1000000010; //W30_128=+0.098017 -0.995185 
7'd66:b_tmp1 =20'b000001 1001_1 000000001; //W31_128=+0. 049068 -0 998795 
7'd19:b_tmp1 =20'b0000000000_1 000000000; //W32_128=+0.000000 -1 000000 
7'd78:b_tmp1 =20'b1 1 1 1 1001 1 1_1 000000001 ; //W33_128=-0.049068 -0 998795 
35 ^^Oibjmpl =20'b1111001110 1000000010; //W34 128=-0.098017 -0 995185 
7'd79, ■ ~ 

7"d21 :b_tmp1 =20'b1 1 1 001 1 1 00_1 000001 01 0; //W36_1 28=-0. 1 95090 -0 980785 
7'd22:b_tmp1 =20'b1 101 10101 1_1 00001 01 10; //W38_128=-0 290285 -0 956940 
7'd80:b_tmp1 =20'b1 10101 01 00_1 00001 1 1 10; //W39_128=-0 336890 -0 941544 
40 7'd23:b_tmp1 =20'b1 1001 1 1 100_10001 001 1 1 ; //W40 128=-0 382683 -0 923880 
7'd81, 

7'd24:b_tmp1 =20'b1 1 00001 1 1 1_1 0001 1 1 1 00; //W42_1 28=-0 471 397 -0 881 921 
7'd25:b_tmp1 =20'b1 01 1 1 001 00_1 001 01 01 1 0; //W44_1 28=-0.555570 -0 831470 
7'd82:b_tmp1 =20'b1011001111_1001100101; /AA/45_128=-0 595699 -0 803208 
45 7'd26:b_tmp1 =20'b10101 1 101 1_1001 1 10100; /AA/46 128=-0 634393 -0 773010 
7'd83, ~ 

7'd27:b_tmp1 =20'b10100101 10_10100101 10; //W48_128=-0.707107 -0 707107 
7'd28:b^tmp1 =20'b1 001 1 1 01 00_1 0101 11011; //W50_1 28=-0. 77301 0 -0 634393 
7'd84:b_tmp1 =20'b1001 100101_101 1001 1 1 1 ; //W51_128=-0 803208 -0 595699 
50 7'd29:b_tmp1 =20'b10010101 10 101 1 100100; //W52 128=-0.831470 -0.555570 
7'd85, 

7'd30:b_tmp1 =20'b10001 1 1 100_1 100001 1 1 1 ; //W54_128=-0.881 921 -0 471397 
7'd31:b_tmp1 =20'b1 0001 001 11_1 1001 11 100; //W56_1 28=-0. 923880 -0 382683 
7'd86:b_tmp1 =20'b1 00001 1 1 10_1 101010100; //W57_128=-0.941544 -0 336890 
55 7'd32:b_tmp1 =20^1000010110^1101101011; //W58 1 28=-0. 956940 -0 290285 
7'd87. 
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7'd33:b_tmp1 =20'b1 00000101 0_1 1 1 001 1 1 00; 

7'd34:b_tmp1 =20'b100000001 0_1 1 1 1 001 1 1 0; 

7'd88:b_tmp1 =20'b1000000001_1 1 1 1 1001 1 1 ; 

7'd89:b_tmp 1 =20'b1 00000001 0_00001 1 001 0; 
5 7*d90:b_tmp1 =20'b1 000001 1 11_0001 1 1 1 100; 

7'd91 :b_tmp1 =20'b1 0001 001 1 1_001 1 0001 00; 

7'd92:b_tmp1 =20'b1001001001_01000001 1 1 ; 

7'd93:b_tmp1 =20'b1001 1 10100_0101000101 • 

7'd94:b_tmp1 =20'b1010101000_0101 1 1 101 1 ; 
10 7'd95:b_tmp1 =20'bldl1100100_0110101010; 

7'd96:b_tmp1 =20'b1 1001 001 01_01 110011 11; 

7'd97:b_tmp1 =20'b1 101 10101 1_01 1 1 101010" 

7'd98:b_tmp1 =20'b1 1 101 10101_01 1 1 1 1 1010; 

default:b_tmp1 =20'b01 1111111 1_0000000000; /AA/00_128=+1 .000000 -0.000000 
15 endcase 

always @(posedge elk) 
if (enable_3) 
b_tmp2 <= b_tmp1; 



//W60_128=-0. 980785 -0.195090 
//W62_128=-0.995185 -0.098017 
//W63_128=-0.998795 -0.049068 
//W66_1 28—0.995 185 +0.098017 
//W69_128=-0.970031 +0.242980 
//W72_128=-0.923880 +0.382683 
//W75_128=-0. 857729 +0.514103 
//W78_128=-0.773010 +0.634393 
//W81_128=-0.671559 +0.740951 
//W84_128=-0.555570 +0.831470 
//W87_1 28— 0.427555 +0.903989 
//W90_1 28—0.290285 +0.956940 
//W93 128=-0.146730 +0.989177 



assign out_br= b_tmp2[c_wordlength*2-1:c_wordlength]; 
assign out_bi = b_tmp2[c_wordlength-1:0]; 



endmodule 

Listing 1 1 

// Sccsld: %W% %G% 

/**" ** ........... ........**.........*..........*... ... 

30 Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

Description: Verilog code for a lookup table decoder 

35 

Notes : Used to generate addresses for each coefficient, based on the 
in Address. Addresses are dependent on one of 4 rows 
(see figures) and on the sequence length (rom_AddressSize). Each 
row gives rise to a unique address sequence based on an 
40 algorithm. N refers to the index of the twiddle factor, NOT the 

absolute address. Breakpoints determine where inc values change 
on line 2. 



% timescale 1ns / 100ps 

module fft_coeff_dcd (elk, enable_3, in_address, out_address, nrst); 

50 parameter rom_AddressSize = 1 ; // Twice ROM address, 
parameter break_point2 = 1 ; // 2nd break pt line 2 
parameter break_point3 = 1 ; // 3rd break pt line 2 

input [rom_AddressSize-1:0] in_address; 
55 input elk, ....... 

nrst, 
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enable_3; 



output [rom_AddressSize-2:0] out_address; 

5 wire [rom_AddressSize-2:0] out_address; 
wire [1:0] line_number; 
wire nrst; 

reg [rom_AddressSize-2:0] out_address_tmp; 
10 reg [1:0] inc, count; 
reg rst; 

// Decode which of the 4 lines are being addressed and assign it a line no. 
// Only need upper two bits of in_address since 4 lines in sequence length. 
15 assign line_number = {in_address[rom_AddressSize-1], 
in_address[rom_AddressSize-2]}; 

// Check for end of line and force out_address to zero on next clock edge- 
always @(in_address) 
20 if (in_address[rom_AddressSize-3:0] == {rom_AddressSize-2{1*b1}}) 

rst = 0; 

else 

rst = 1 ; 

25 // Check for line number and decode appropriate out_address using algorithm 
// derived by studying coefficient tables for mpys M0, M1 and M2. 
always @(line_number or in_address or count) 
case (line_number) 

// 

30 2*d0: // LINE 0, inc by 2, then run the inc sequence 1,1,2,1,1,2... 
begin 

if (in_address[rom_AddressSize-3] & (jin_address[rom_AddressSize-4:0])) 
begin 

if (count == 2'd1 | count == 2'dO) 
35 inc = 2'd1; 

else 

inc = 2'd2; 
end 
else 

40 inc = 2'd2; 

end 

// 

2'd1: //LINE 1, inc by 1. 
inc = 1; 

45 // 

2'd2: // LINE 2 inc by 3, (inc by 2 at N/4+1), (inc by 1 at N/2-1), 
begin 

. if (in_address[rom__AddressSize-3:0] >= break_pOint3) 
inc = 2'd1; // Third stage, inc by 1 . 

, 50 else if (in_address[rom_AddressSize-3:0] >= break_point2) 

inc = 2'd2; // Second stage, inc by 2. 

else 

inc = 2'd3; // First stage, inc by 3. 

end 

55 // 

2'd3: // LINE 3, fixed at address 0. 



BNSDOCID- < WO ; > 



WO 98/19410 PCT/US97/1891 1 

98 

inc = 2'dO; 

// 

endcase 

5 always @(posedge elk) 
if (enable_3) 
begin 

if (inrst 1 1 !rst) // out_address=0 at end of line or pwr Reset. 
out_address_tmp <= 0; 
10 else 

out_address_tmp <= out_address_tmp + inc; 

// Only count if at the correct point on line 2. 

if (in_address[rom_AddressSize-3] & (|in_address[rom_AddressSize-4:0])) 
15 count <= ((count == 2'd2) ? 2'dO : count + 2'd1); // Only count to 2. 

else 

count <= 2'dO; 
end 

20 assign out_address = out_address_tmp; 
endmodule 

Listing 12 

// Sccsld: %W% %G% 
25 r * ************ **** ********************** 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

30 Description: Verilog code for a configurable 2K/8K radix 2 A 2 + 2, 
singlepath-delay-feedback, decimation in frequency, 
(r22+2sdf DIF) Fast Fourier Transform (FFT) processor. (RTL) 

Notes : This FFT processor computes one pair of l/Q data points every 4 
35 fast elk cycles. A synchronous active-low reset flushes the 

entire pipeline and resets the FFT. Therefore the next pair of 
valid inputs are assumed to be the start of the active interval 
of the next symbol. There is a latency of 2048/8192 sample 
points + 7 slow clock cycles. This equates to (2048/8192 + 7)*4 
40 fast elk cycles. When the out_ovf flag is raised an overflow has 

occured and saturation is performed on the intermediate 
calculation upon which the overflow has occured. If the valid_in 
flag is held low, the entire pipeline is halted and the 
valid_out flag is also held low. vaiid_out is also held low 
45 until the entire pipeline is full (after the above number of 

clock cycles). • •* 

To Do: RAM control (MUX), 

ROM lookup (quadrant lookup), 
50 Change BF code for unique saturation nets for synthesis. 

ovf_detection (correct) register o/p 

ovf detection (correct) for mpy and BFs 
ROM/RAM test stuff. 



55 
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% timescale 1ns / 100ps 

module fft_r22sdf (in_xr, 
in_xi, 
5 elk, 
nrst, 

in_2k8k, 
valid_in, 
out_xr t 
10 out_xi, 

out_ovf, 
enableJD, 
enable_1, 
enable_2, 
15 enable_3, 
valid_out, 
ram_address, 
ram_enable, 
address__rom3, 
20 address_rom4, 

z2r_4, z2i_4, // RAM input ports. 

z2r_5, z2i_5, // Output data from this 
z2r_6, z2i_6, // module. 
z2r_7, z2i_7, 
25 z2r_8, z2L8, 

z2r_9, z2i_9, 
z2r_10, z2M0, 

x1r_4,x1i_4, // RAM output ports. 

x1r_5, x1i_5, // Input data to this 
30 x1r_6, x1i_6 t // module. 

x1r_7, x1i_7, 

x1r_8, x1i_8, 

x1r_9 t x1i_9, 

x1r_10, x1i_10, 
35 br_3, bi_3, 

br_4, bi_4); 



// 

// Parameter definitions. 



40 // 



parameter wordlength = 12; // Data wordlength. 
parameter c_wordlength = 10; // Coeff wordlength. 
parameter AddressSize = 13; // Size of address bus. 
45 parameter rom_AddressSize =13; // ROM address bus size, 
parameter mult_scale = 3; // Multiplier scaliing: 

// 1 = /4096, 2 = /2048, 

//3 = /1024, 4 = /512.- 
parameter s12_wdlength = 11; // Sectn 12 wordlength. 
50 parameter s1 1_wdlength =12; // Sectn 1 1 wordlength. 

//s11 >= s12 >=wordlen 

// . 

// Input/Output ports. 
55 // . — ,~ ~— 
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input elk, // Master clock. 

nrst, // Power-up reset. 

in_2k8k, // 2K mode active low. 
validjn; // Input data valid, 
input [9:0] in_xr, // FFT input data, I. 
in_xi; // FFT input data, Q. 



input [wordlength-1 :0] x1r_4, x1i_4, 
x1r_5, x1i_5, 
x1r_6, x1i_6, 
x1r_7, x1i_7, 
x1r_8, x1i_8, 
x1r_9, x1i_9, 
x1r_10, x1M0; 

input [c_wordlength-1:0] br_3, bi_3, 
br 4, bi 4; 



// RAM output ports. 



output out_ovf, 
enable_0, 
enable_J , 
enable_2, 
enable_3, 
valid_out, 
ram enable; 



// Overflow flag. 
// Enable clock 0. 
// Enable clock 1. 
// Enable clock 2. 
// Enable clock 3. 
// Output data valid. 



output [wordlength-1 :0] out_xr, // FFT output data, I. 
out_xi; // FFT output data, Q. 



output [wordlength-1 :0] z2r_4, z2i_4, 

z2r_5. z2L5, 

z2r_6, z2i_6, 
z2r_7. z2L7, 

z2r_8, z2i_8, 

z2r_9, z2i_9, 
z2r 10, z2i 10; 



output [rom_AddressSize-6:0] address_rom3; 
output [rom_AddressSize-4;0] address_jom4; 

output [AddressSize-1:0] ram_address; 

// 

// Wire/register declarations, 



// RAM input ports. 



wire [1:0] control; //elk decode. 

wire [Ad dress Size- 1:0] address, // FFT. main address bus. 
s, // Pipeline SRs to BFs. 

ram address; // RAM address bus. 



wire [wordlength-1 :0] 
x1r_1, x1M, 
x1r_2. x1i_2, 
x1r_3, x1i_3, 
x1r_4, x1i_4, 



x1 r_0, x1 i_0, // Couples the l/Q data 
// outputs from the 
// memory to the 
// respective butterfly 
// processors, via an 
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x1 r_5, x1 i_5, // input register. 
x1r_6, x1i_6, 
x1r_7, x1i_7, 
x1r_8, x1i_8, 
5 x1r_9, x1i_9, 

x1r_10, x1i_10, 

x2r_0, x2i_0, // Couples the l/Q data 

x2r_1 , x2M , // outputs from BF2I 
1 0 x2r_2, x2i_2, // to the l/Q inputs of 

x2r_3, x2i_3, // BF2II. Also connects 
x2r_4, x2i_4, // the l/Q ouputs of the 
x2r_5, x2i_5, // complex multiplier 
x2r_6, x2i_6, // to the inputs of the 
1 5 x2r_7, x2i_7, // next radix 2 A 2 stage. 

x2r_8, x2i_8, 

x2r_9, x2i_9, 

x2r_10, x2i_10; 

20 reg [wordlength-1:0] x1r_4_tmp, x1i_4_tmp, // Registered inputs 
x1r_5_tmp, x1i_5_tmp, //from RAM. 

x 1 r_6_tmp, x 1 i_6_tmp, 

x1r_7_tmp, x1i_7_tmp, 

x1 r_8_tmp, x1 i_8_tmp, 
25 x1r_9_tmp, x1i_9_tmp, 

x1r_10_tmp, x1i_10_tmp; 

wire [s1 1_wdlength-1 :0] x1 r_1 1 , x1 i_1 1 , // Different bit-widths 
x2r_1 1 , x2i_1 1 ; // for l/Q lines, but 
30 wire [s12_wd length- 1:0] x1r_12, x1i_12; // similar to the above. 

wire [wordlength-1:0] ar_0, ai_0, // Couples the l/Q data 
ar_1 , ai_1 , // outputs of the 
ar_2, ai_2, // previous radix 2 A 2 
35 ar_3, ai_3, // stage into the 

ar_4, ai_4, // complex multiplier 
ar_5, ai_5; // of the next stage. 

wire [c_wordlength-1:0] br_0, bi_0, //Couples the l/Q 
40 br_1 , bi_1 , // coefficient outputs 

br_2 t bi_2, // from the ROM demapper 
br_3, bi_3, // to the complex 
br_4, bi_4, // multiplier. 
br_5, bi_5; 

45 

wire [wordlength-1:0] z2r_0, z2i_0, 
z2r_1 , z2i_1 , 

z2f_2, z2i_2, 
z2r_3. z2i_3; 

50 

reg [wordlength-1:0] z2r_4, z2i_4, // Registered outputs 
z2r_5, z2i_5, // to RAM. 

z2r_6, z2i_6, 
z2r_7, z2i_7, 
55 z2r_8. z2i_8, 

z2r 9. z2i 9; 
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wire [wordlength-1:0] z2r_10, z2M0; //WILL CHANGE WHEN RAM RIGHT 2 rg 

wire [wordlength-1;0] z2r_4_tmp, z2i_4_tmp, // Couple the l/Q data 
z2r_5_tmp, z2i_5_tmp, // outputs of each BF 

z2r_6_tmp, z2i_6_tmp, // processor to their 
z2r_7_tmp, z2i_7_tmp, // respective memory 

z2r_8_tmp, z2i_8_tmp, // inputs via an output 

z2r_9_tmp, z2i_9_tmp, // register. 
z2r_10Jmp, z2M0_tmp; 



wire 
wire 

wire 
wire 
wire 
wire 

wire 
wire 
wire 
wire 

wire 



s11_wdlength-1:0] z2r_11, z2M1; 
s12_wdlength-1:0] z2r_12, z2i_12; 



// Different bit-widths 
//for the 1st 2 stages. 



rom_AddressSize-8:0] address_rom2; 

rom_AddressSize-6:0] address_rom3; 

rom_AddressSize-4:0] address__rom4; 

rom__Add ressSize-2 : 0] add ress_rom5 ; 



rom_AddressSize-7 
rom_AddressSize-5 
rom_AddressSize-3 
rom AddressSize-1 



0] dcd_address2 
0] dcd_address3 
0] dcd_address4 
0] dcd_address5 



// Couples the address 
// decoders outputs to 
// respective ROMs. 



// Couples part of the 
// address bus to the 
// coefficient decoder. 



ovf_0, ovf_1, 
ovf_2, ovf_3, 
ovf_4, ovf_5, 
ovf_6, ovf_7, 
ovf_8, ovf_9, 
ovf_10, ovf_11, 
ovf_12, ovfJ3, 
ovf_14, ovM5, 
ovf_16, ovf_17, 
ovf 18; 



// Couples overflow 
// flag outputs from 
// each butterfly 
// processor and complex 
// multiplier into one 
// overflow status flag 
// called "out ovf. 



35 



40 



45 



50 



55 



wire elk, 

nrst, 
in_2k8k, 

ovf_2k, 
out_ovf, 
enable_0, 
enable_1, 
enable_2, 
enable_3, 

ram_enable; 



reg 



reg 
reg 
reg 
reg 



reg 



// RAM enable signal. 



ovf_tmp1, 
ovf_tmp2, 

• fft_cycle_complete, // End of 1st FFT cycle. . 
output_valid; // Output valid flag. 
[3:0] pipeline_count; // Counts pipeline regs. 
[AddressSize-1:0] q, t; 
[1:0] r; 

[wordlength-1:0] x1r_0_reg, x1i_0_reg, 
xr_tmp2, // Output data reg, I. 
xi_tmp2; // Output data reg, Q. 
[s12_wdlength-1:0] in_xr_tmp, in_xi_tmp; 
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reg [9:0] xr_reg, // Input data reg, I. 

xi_reg; // Input data reg, Q. 
reg [wordlength-1:0] x2r_10_tmp2, x2i_10_tmp2, 

x2r_10_tmp3, x2i_10_tmp3; 

wire [wordlength-1:0] xr_tmp1, // Final BF2I(0) out, I. 

xi_tmp1; // Final BF2I(0) out, Q. 
wire [wordlength-1 :0] x2r_10_tmp1, x2i_10_tmp1; 
wire [s12_wdiength-1 :0] x2r_1 1_tmp, x2i_1 1_tmp; 



// Address decoders/Quadrant mappers + pipeline shift registers. 

15 /* fft_sr_addr #(rom_AddressSize-6, 3) sr_addr_2 
(elk, enable_3, 
address[6:0], // Input. 
dcd_address2); // Output. 

20 fft_coeff_dcd #(rom_AddressSize-6, 11,21) 

coeff_dcd_2 (elk, enable_3, dcd_address2, address_rom2, nrst); */ 



// 



25 fft_sr_addr #(rom_AddressSize-4, 2) sr_addr_3 
(elk, enable_3, 
address[8:0], // Input. 
dcd_address3); // Output. 

30 fft_coeff_dcd #(rom_AddressSize-4, 43, 85) 

coeff_dcd_3 (elk, enable_3, dcd_address3, address_rom3, nrst); 



//-- 



35 fft_sr_addr #(rom_AddressSize-2, 1)sr_addr_4 
(elk, enable_3, 
address[10:0], //Input. 
dcd_address4); // Output. 

40 fft_coeff_dcd #(rom_AddressSize-2, 171, 341) 

coeff_dcd_4 (elk, enable_3, dcd_address4, address_rom4, nrst); 



// 



45 r fft_coeff_dcd #(rom_AddressSize, 683, 1365) 

coeff_dcd_5 (elk, enable_3, address; address_rom5, nrst)'; */ 



// — „ r j.„ _ ... 

// ROM lookup tables. 
50 // 



fft_hardwired_lu0 #(c_wordlength, rom_AddressSize-10)// Case table instance 
romO (elk, enable_3, address[2:0], br_0, bi_0): // for a hardwired ROM. 

55 fft_hardwired_lu1 #(c_wordlength. rom_AddressSize-8) // Case table instance 
rom1 (elk, enable_3, address[4:0], br_1. bi_1); // for a hardwired ROM. 
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fft_hardwiredju2 #(c_wordlength, rom_AddressSize-6) // Case table instance 
rom2 (elk, enable_3, address[6:0], br_2, bi_2); //for a hardwired ROM. 

/*fft_hardwired_lu3 #(c_wordlength, rom_AddressSize-4) // Case table instance 
5 rom3 (elk, enable_3, address[8:0], br_3, bi_3); // for a hardwired ROM.*/ 

/*fft_hardwired_lu3 #(c__word length, rom_AddressSize-5)// Case table instance 
rom3 (elk, enable_3, address_rom3, br_3, bi_3); // for a hardwired ROM.*/ 

10 /*fft_rom #(c_wordlength, rom_AddressSize-6, 

n . ./. ./. 7fft/src/lookup_tables/lu_1 0bit_1 28pt_scale1 M ) 
rom2 (address[6:0], br_2, bi_2); // 128 addresses x 20 bits, no decode. */ 

/*fft_rom #(c_word length, rom_AddressSize-7, 
1 5 ./. ./. 7fft/src/lookup_tables/lu_1 0bit_1 28pt_scale1 ") 

rom2 (address_rom2, br_2, bi_2); //64 addresses x 20 bits, coeff decode. */ 

/*fft_rom #(c_wordlength, rom_AddressSize-4, 

"../../../fft/src/lookupJables/lu^lObi^S^pt^scaier') 
20 rom3 (address[8:0] t br_3, bi_3); // 512 addresses x 20 bits, no decode. */ 

/* fft_rom #(c_wordlength, rom_AddressSize-5, 

n ../.7.7fft/src/lookupJables/lu_10bit_512pt_scale1 M ) 
rom3 (elk, enable_3, address_rom3, br_3, bi_3); //256 addresses x 20 bits.*/ 

25 

/*fft_rom #(c_wordlength, rom_AddressSize-2, 

^ .7../../fft/src/lookup_tables/lu_10bit_2048pt_scaler , ) 
rom4 (address[10:0] t br_4, bL4); // 2048 addresses x 20 bits, no decode. */ 

30 /* fft_rom #(c_wordlength, rom_AddressSize-3, 

". 7. 7. 7fft/src/lookup_tables/lu_1 0bit_2048pt_scale 1 ") 
rom4 (elk, enable_3, address_rom4, br__4, bi_4); // 1024 addresses x 20 bits.*/ 

/*fft_rom #(c_wordlength, rom_AddressSize, 
35 ". 7. 7. 7fft/src/lookup_tables/lu_1 0bit_8 1 92pt_scale 1" ) 

rom5 (address, br_5, bi_5); // 8192 addresses x 20 bits, no decode. */ 

/* fft_rom #(c_wordlength, rom_AddressSize-1 , 

u .7.7.7fft/src/lookupJables/lu_10bit_8192pt_scale1 M ) 
40 rom5 (elk, enable_3, address_rom5, br__5, bi_5); // 4096 addresses x 20 bits.*/ 

// 

// Section 12 and 11, tail end of FFT pipeline (input stage). 
// Section 12 is 11 bits wide and incorporates the 2K/8K control logic. 
45 // „ . .„„„ 

always @(xr_reg or xi_reg or in_2k8k or x2r_10_tmp1 or x2M0_tmp1 

• or x2O0_tmp3 or x2M0_tmp3) 
if (!in_2k8k) // Configuring for 2K mode. 
50 begin 

x2r_10__tmp2 = x2r_10_tmp3; 
x2i_10_tmp2 = x2M0_tmp3; 
in_xr_tmp = 0; 

in_xi_tmp = 0; ( 
55 end 

else // Configuring for 8K mode. 
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begin 

x2r_10_tmp2 = x2r_10_tmp1; 
x2i_10_tmp2 = x2i_10_tmp1; 

// Sign extend from 10 bits, as section 12 is s12_wdlength bits. 
5 in_xr_tmp = {{(s12_wdiength-9){xr_reg[9]}}.xr_reg[8:0]}; 

in_xi_tmp = {{(s12_wdlength-9){xi_reg[9]}},xi_reg[8:0]}; 
end 

always @(posedge elk) // Pipeline register to enable correct operation in 
10 if(enable_3) // 2K mode without retiming the entire pipeline since 
begin // 8K mode introduces 1 additional pipeline register. 
// Sign extend 10 bit inputs to wordlength bit inputs. 
// for bypass lines into stage 5. 

x2r_10_tmp3 <= {{(wordlength-9){xr_reg[9]}},xr_reg[8:0]}; 
15 x2i_10_tmp3 <= {{(wordlength-9){xi_reg[9]}},xi_reg[8:0]j; 

end 



20 



assign x2r_10 = x2r_10_tmp2; 
assign x2i_10 - x2i_10_tmp2; 



// Sign extend from s12_wdlength bits to s1 1_wdlength bits between 
// sections 12 and 11. Uncomment below if s_1 1 < > s_12. 
assign x2r_11 = {{(s11_wdlength-s12_wdlength+1) 

{x2r_1 1_tmp[s12_wdlength-1]}},x2r_1 1_tmp[s12_wdlength-2:0]}; 
25 assign x2i_11 = {{(s1 1_wdlength-s12_wdlength+1) 

{x2i_1 1_tmp[s12_wdlength-1]}},x2i_1 1_tmp[s12_wdlength-2:0]}; 
// Uncomment below if s_1 1 = s_1 2. 
/* assign x2r_11 = x2r_11_tmp; 
assign x2i_1 1 = x2i_11_tmp; */ 

30 

fft_bf2l #(s12_wdlength) bf2l_6 
(elk, enable_1, 

x1r_12, x 1 i_1 2 , in_xr_tmp, in xi tmp, // Ext In. 
s[12], 

35 x2r_1 1_tmp, x2i_1 1_tmp. z2r_12, z2i 12. // Outputs 

ovf_18); 

r fft_ram #(s12_wd length, 12) ram_12 (elk, enable_1, enable_3, 
ram_address[1 1 :0], // 4096 addrs 
40 z2r_12, z2i_12, //Inputs. 

x1r_12, x1i_12); //Outputs.*/ 

fft_bf2ll #(s11_wdlength) bf2ll_6 
(elk, enable_1, 

45 x1r_11, x1i_11, x2r_11, x2i_11, //Inputs 

s[11],s[12], 

ar_5, ai_5, z2r_1 1 , z2i_1 1 , // Outputs 
ovfJ7); 

50 fft_sr_1bit#(1) sr_1bit_11 (elk, enable_3. address[1 1], s[1 1]); // SR 11 
fft_sr_1bit #(1) sr_1bit_12 (elk. enable_3, address[12], s[12]); // SR 12. 

/*fft_ram #(s1 1_wdlength, 11) ram_11 (elk. enable_1, enable_3, 
ram_address[10:0], // 2048 addrs 
55 z2r_1 1 , z2i_1 1 , //Inputs. 

x1r_11, x1i_11); //Outputs.*/ 
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35 



// 

// Section 1 0 and 9. 

// 



fft_compiex_mult_mux #(wordlength, c_wordlength, mult_scale) m5 
(elk, control, 

ar_5. ai_5, br_5, bi_5, // Inputs. 
x2r_1 0_tmp1 , x2i_1 0_tmp1 , // Outputs. 
10 ovf_16); 

fft_bf2l #(wordlength) bf2l_5 (elk, enable_1. 
x1r_10, x1i_10, //Inputs. 
x2r_10, x2i_10, 
15 s[10], 

x2r_9, x2i_9, // Outputs. 

z2r_10, z2i_10, 
ovf_15); 

20 fft_bf 2 1 1 #(wordlength) bf2ll_5 (elk, enable_1. 

x1 r_9_tmp, x1 i_9_tmp, // Inputs. 

x2r_9, x2i_9, 
s[9], s[10], 

ar_4, ai_4, // Outputs. 
25 z2r_9_tmp, z2i_9_tmp, 

ovf_14); 



fft_sr_1bit#(2) sr_1bit_9 (elk, enable_3, address[9], s[9]); // SR 9 
fft_sr_1bit#(2) sr_1bit_10 (elk, enable_3, address[10], s[10]); // SR 10. 



// 

// Section 8 and 7. 

// 



fft_complex_mult_mux #(wordlength, c_wordlength, mult_scale) m4 
(elk, control, 

ar_4. ai_4, br_4, bi_4, // Inputs. 
x2r_8, x2i_8, // Outputs. 

40 ovf_1 3); 

fft_bf2l #(wordlength) bf2l_4 (elk, enable_1, 
x1r_8_tmp, x1i_8_tmp, //Inputs. 
x2r_8, x2i_8, 
45 s[8], 

. x2r_7. x2i_7, // Outputs. 
z2r_8_tmp, z2i_8_tmp, 
ovf_12); 

50 fft_bf2M #(wordlength) bf2ll_4 (elk, enable_1, 
x1 r_7_tmp, x1 i_7_tmp, // Inputs. 

x2r_7, x2i_7, 
s[7], s[8], 

ar_3, ai_3, // Outputs. 
55 - z2r_7_tmp, z2i_7_tmp, 

ovf_11); 
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fft_sr_1 bit #(3) sr_1bit_7 (elk, enable_3, address[7], s[7]); // SR 7. 
fft_sr_1bit #(3) sr_1bit_8 (elk, enable_3, address[8], s[8]); // SR 8. 

5 // 

// Section 6 and 5. 

fft_complex_mult_mux #(wordlength, c_wordlength, mult_scale) m3 
10 (elk, control, 

ar_3, ai_3, br_3, bi_3, // Inputs. 
x2r_6, x2i_6, // Outputs. 

ovf_10); 

15 fft_bf2l #(wordlength) bf2l_3 (elk, enable_1 , 
x1 r_6_tmp, x1 i_6_tmp, // Inputs. 

x2r_6, x2i_6, 
s[6], 

x2r_5, x2i_5, // Outputs. 
20 z2r_6_tmp, z2i_6_tmp, 

ovf_9); 

fft_bf2ll #(wordlength) bf2ll_3 (elk, enable_1, 
x 1 r_5_tmp , x 1 i_5_tmp , // I n p uts . 
25 x2r_5, x2i_5, 

s[5], s[6]. 

ar_2, ai_2, // Outputs. 

z2r_5_tmp, z2i_5_tmp, 
ovf_8); 

30 

fft_sr_1bit #(4) sr_1bit_5 (elk, enable_3, address[5], s[5]); // SR 5. 
fft_sr_1bit #(4) sr_1bit_6 (elk, enable_3, address[6], s[6]); // SR 6. 

// . . 

35 // Section 4 and 3. 

// 

fft_complex_mult_mux #(wordlength, c_wordlength, mult_scale) m2 
(elk, control, 

40 ar_2, ai_2, br_2, bi_2, // Inputs. 

x2r_4, x2i_4, // Outputs. 

ovf_7); 

fft_bf2l #(wordlength) bf2l_2 (elk, enable_1, 
45 x1r_4_tmp, x1i_4_tmp, //Inputs. 

x2r_4, x2i_4, 
s[4], 

x2r_3.x2L3, //Outputs. 
z2r_4_tmp, z2i_4_tmp, 
50 ovf_6); 

fft_bf2ll #(wordlength) bf2ll_2 (elk, enable_1, 
x1r_3. x1i_3, //Inputs. 
x2r_3, x2i_3, 
55 s[3], s[4], 

ar_1 , ai_1 , // Outputs. 
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z2r_3, z2i_3. 
ovf_5); 

fft_sr_1bit #(5) sr_1bit_3 (elk, enable_3, address[3], s[3]); // SR 3. 
fft_sr_1bit #(5) sr_1bit_4 (elk, enable_3, address[4], s[4]); // SR 4. 

fft_sr_iq #(wordlength, 8) sr_iq_3 (elk, enable_3, // Length = 8. 
z2r_3, z2i_3, // Inputs. 
x1r_3, x1i_3); //Outputs. 



// 

// Section 2 and 1 . 
// 



15 fft_complex_mult_mux #(wordlength, c_wordlength, mult_scale) ml 
(elk, control, 

ar_1 , ai_1 , br_1 , bi_1 , // Inputs. 
x2r_2, x2i_2, // Outputs. 

ovf_4); 

20 

fft_bf2l #(wordiength) bf2l_1 (elk, enable_1, 
x1r_2, x1i_2, //Inputs. 

x2r_2. x2i_2, 
s[2], 

25 x2r_1 , x2M , // Outputs. 

z2r_2, z2i_2. 
ovf_3); 

fft_sr_iq #(word!ength, 4) sr_iq_2 (elk, enable_3, // Length = 4. 
30 z2r_2, z2i_2, // Inputs. 

x1r_2, x1i_2); //Outputs. 

fft_bf2ll #(wordlength) bf2ll_1 (elk, enable_1, 
x1r_1, x1i_1, // Inputs. 
35 x2r_1 , x2i_1 , 

s[1],s[2], 

ar_0. ai_0, // Outputs. 

z2r_1 , z2i_1 , 
ovf_2); 

40 

assign s[1] = ~address[1]; // Invert s[1] (see count sequence), SR1 not req. 
//fft_sr_1bit #(6) sr_1bit_1 (elk, enable_3, address[1], s[1]); // SR 1 . 
fft_sr_1 bit #(6) sr_1bit_2 (elk, enable_3, address[2], s[2]); // SR 2. 

45 fft_sr_iq #(wordlength, 2) sr_iq_1 (elk, enable_3, // Length = 2. 
z2r_1,z2i_1, //Inputs. 
x1r_1, x1i_1); //Outputs. 

// : , 

50 // Section 0, front end of FFT pipeline (output stage), mult_scaie=4. 



// 



fft_complex_mult_mux #(wordiength, c_wordlength, 4) mO 
(elk, control, 

55 ar_0. ai_0, br_0, bi_0, // Inputs. 

x2r_0. x2i_0. // Outputs. 
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ovf_1); 

fft_bf2l #(wordlength) bf2l_0 (elk, enable_1, 
x1r_0, x1i_0, // Inputs. 

x2r_0, x2i_0, 
s[0], 

xr_tmp1, xi_tmp1, // Outputs. 

z2r_0, z2i_0, 
ovf_0); 

assign s[0] = -address[0]; // invert s[0] (see count sequence), SRO not req. 
//fft_sr_1bit #(7) sr_1bit_0 (elk, enable_3, address[0], s[0]); // SR 0. 



// Last stage should be just a single register as only 1 location needed. 
15 always @(posedge elk) // No reset required as data clocked through registers, 
if (enable_3) 
begin 
x1r_0_reg <= z2r_0; 
x1i_0_reg <= z2i_0; 
20 end 

assign x1r_0 = x1r_0_reg; 
assign x1i_0 = x1i_0_reg; 



25 // 

// Register Inputs/Outputs. 
// 



Mfdef BIN_SHIFT 
30 always @(posedge elk) // Registered inputs. 

if (enable_3 && !address[0]) // == freq bin shift by pi. 
begin 
xr_reg <= in_xr; 
xi_reg <= in_xi; 
35 end 

else if (enable_3 && address[0]) // == freq bin shift by pi. 
begin 

xr_reg <= -injer + 1'b1 ; // This is equivalent to multiplying by 
xi__reg <= Hn_xi + 1'b1; // exp(-j * pi * n) == (-1) A n. 
40 end 
'else 

always @(posedge elk) // Registered inputs. 
if(enable_3) 
begin 

45 xr_reg <= in_xr; 

xi_reg <= in_xi; 
end 
'endif 

50 always @(posedge elk) // Registered outputs, 
if (enable_3) 
begin 
xr_tmp2 <= xr_tmp1; 
xi__tmp2 <= xi_tmp1; 
55 end 
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assign out_xr = xr_tmp2; 
assign out_xi = xi_tmp2; 

always @(posedge elk) // RAMs are latched on outputs so no 
5 begin // need to enable. 

z2r_4 <= z2r_4_tmp; // Register FFT outputs to RAM. 

z2i_4 <= z2L4_tmp; 

z2r__5 <= z2r_5_tmp; 

z2i_5 <= z2i_5_tmp; 
10 z2r_6 <= z2r_6_tmp; 

z2i_6 <= z2i_6_tmp; 

z2r_7 <= z2r_7_tmp; 

z2i_7 <= z2i_7_tmp; 

z2r_8 <= z2r_8Jmp; 
15 z2i_8 <= z2i_8_tmp; 

z2r_9 <= z2r__9_tmp; 

z2i_9 <= z2L9_tmp; 
// z2r_10 <= z2r_10_tmp; 
// z2i_10 <= z2M0_tmp; 
20 x1r_4_tmp <= x1r_4; // Register FFT inputs from RAM. 

x1i_4_tmp <= x1i_4; 

x1r_5__tmp <= x1r_5; 

x1i_5__tmp <= x1i_5; 

x1r_6_tmp <= x1r_6; 
25 x1 L6_tmp <= x1 i_6; 

x1r_7__tmp <= x1r_7; 

x1i_7_tmp <= x1i_7; 

x1r_8_trnp <= x1r_8; 

x1i_8_tmp <= x1i_8; 
30 x1 r_9_tmp <= x1 r_9; 

x1i_9_tmp <= x1i_9; 
// x1 r_1 0_tmp <= x1 r_1 0; 
// xliJOJmp <= x1M0; 

end 



// 

// Synchronous butterfly controller. 

// . 

40 

always @(posedge elk) 

if (!nrst) // Synchronous power-up reset, 

q <= 0; 

else if (enable_3) 
45 q<=q + 1'b1; 

assign address = q; 

// „ . 

50 // Synchronous RAM address generator. 

// . 

always @(posedge elk) 

if (!nrst) // Synchronous power-up reset 

55 t<=0; ....... 

else if (enable_2) 
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t <=t+ rb1; 
assign ram_address = t; 

assign ram_enable = enable_3 1 1 enable_2; // ram enable signal. 



// valid_out status flag generation. 

// 

always @(posedge elk) 
if (!nrst) 

ffi_cycle_complete <= VbO; // Detect end of 1st fft cycle i.e. 2K or 8K. 
else if (Hn_2k8k && &address[10:0]) j | (in_2k8k && &address[12:0])) 

fft_cycle_complete <= 1'b1; 
else 

fft_cycle_complete <= fft_cycle_complete; 

always @(posedge elk) // Account for pipeline and I/O registers, 
if (Inrst) 

pipeline_count <= 4'bO; // Stop at pipelinejjepth - 1 . 

else if (enable_3 && fft_cycle_complete & pipeline_count < 8)//pipe depth=8 
pipeline_count <= pipeline j;ount + 1*b1; 

always @(posedge elk) // Test if the pipeline is full and the input 
if (Inrst) // is valid before asserting valid j>ut. 

output j/alid <= 1'b0; 
else if (enable_2 && pipeline_count[3]) 

output_valid <= 1*b1; 
else 

output_valid <= 1'b0; 
assign valid_out = outputj/alid; 

// 

// Fast 40 MHz clock decoder and valid in control 

// 

always @(posedge elk) 

if (Inrst) // Synchronous power-up reset. 

r<=0; 

else if (validjn) // Count if input data valid. 

r<=r+ 1'b1; 

assign control = {validjn & r[1], validjn & r[0]}; 

assign ehable_0 = validjn '& (-r[1] & -r[0]); // Gate validjn with 
assign enable_1 = validjn & (~r[1 ] & r[0]); // decoded enable signals 
assign enable_2 = validjn & ( r[1] & -r[0]); // to control all reg's. 
assign enable_3 = validjn & ( r[1] & r[0]); 

// . . 

// Overflow detection, OR overflows from each stage to give overflow flag. 



assign ovf_2k = ovf_0 j j ovf_1 j | ovf_2 ] i ovf_3 j | ovf_4 1 1 
ovf_5 | i ovf_6 1 1 ovf_7 | j ovf_8 j j ovf_9 i ] 
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ovf_10 jl ovf_11 jj ovf_12 || ovf 13 ! I ovf 14 I j 
ovf_15; " 

// 2k/8k Overflow flag configuration. 

always @(in_2k8k or ovf_16 or ovf_17 or ovf_18 or ovf_2k) 
if (in_2k8k) 

ovMrnpl = ovf_2k 1 1 ovf_16 1 1 ovf_17 1 1 ovf_18; 
else 

ovMrnpl = ovf_2k; 



always @(posedge elk) // Register overflow 

if (enable_3 && fft_cycle_complete) // flag to change when 
ovf_tmp2 <= ovf_tmp1; // l/Q samples are valid 

// from FFT processor. 
15 assign out_ovf = ovf_tmp2; 

'ifdef OVERFLOW_DEBUG 

// Debug code to display overflow output of a particular instance. 
// Concurrently monitor overflow flag and halt on overflow. 
20 always @(out_ovf) // ovf_x wires are all registered at lower level, 
if (out_ovf) 
begin 

Sdisplay ("Overflow has occurred, type . to continue."); 

Sdisplay ("Overflow flag, out_ovf = ",out_ovf); 
25 if (ovf_18) Sdisplay ("Overflow on port ovf_18"); 

if (ovf_17) Sdisplay ("Overflow on port ovf_17"); 

if (ovfJ6) Sdisplay ("Overflow on port ovf_16"); 

if (ovf_15) Sdisplay ("Overflow on port ovf_15"); 

if (ovf_14) Sdisplay ("Overflow on port ovf_14"); 
30 if (ovf_13) Sdisplay ("Overflow on port ovf_13"); 

if (ovf_12) Sdisplay ("Overflow on port ovf_12 M ); 

if (ovf_1 1) Sdisplay ("Overflow on port ovf_1 1 M ); 

if (ovf_10) Sdisplay ("Overflow on port ovf_10 M ); 

if (ovf_9) Sdisplay ("Overflow on port ovf_9 M ); 
35 if (ovf_8) Sdisplay ("Overflow on port ovf_8 M ); 

if (ovf_7) Sdisplay ("Overflow on port ovfJT); 

if (ovf_6) Sdisplay ("Overflow on port ovf__6"); 

if (ovf_5) Sdisplay ("Overflow on port ovf_5"); 

if (ovf_4) Sdisplay ("Overflow on port ovf_4 H ); 
40 if (ovf_3) Sdisplay ("Overflow on port ovf_3 M ); 

if (ovf_2) Sdisplay ("Overflow on port ovf_2"); 

if (ovf__1) Sdisplay ("Overflow on port ovf_1"); 

if (ovf_0) Sdisplay ("Overflow on port ovf_0 M ); 

Sstop; 
45 end 

'endif * 
endmodule 

Listing 13 

50 // Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



55 



Author : Dawood Alam. 

Description: Veriiog code for the window lookup table, used to determine the 
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variance of the data and hence the F_ratio. 
Notes : 

'tirnescale 1ns / 100ps 

module fft_windowJu (elk, enable_3, in_address, out_data); 



parameter 
parameter 

input 



r_wordlength =10; // Data wordlength. 
lu_AddressSize =13; // Address bus size. 



elk, 
enable_3; 
input [lu_AddressSize-1:0] in_address; 

output [r_wordlength-1:0] out_data; 

reg [r_wordlength-1:0] data_jtmp1, 
data_tmp2; 





always @(in_address) 
casez (in address) 
13'b0000000000000 : data tmp1 = 


IU Dl UUUUUUUUU, 




13'b0000000000001 


: data_tmp1 = 


10'b0000000000; 


30 


13'b0000000000010 
13'b0000000000011 


: data_tmp1 = 
: data_tmp1 = 


10'b0000100111; 
10'b0000111110; 




13'b0000000000100 


: data_tmp1 = 


10'b0001001110; 


35 


13'b0000000000101 


: data_tmp1 = 


10'b0001011011; 




13'bOOOOOOOOOOHO 


• data_tmp1 = 


10'b0001100110; 


40 


13'b0000000000111 
13'b0000000001000 


data_tmp1 = 
data_tmp1 = 


10'b0001101110; 
10'b0001 110110; 




13'b0000000001001 


data_tmp1 = 


10'b0001 1 1 1101 ; 


45 


13'b0000000001010 


data_tmp1 = 


10'b0010000011; 




13'b0000000001011 


data_tmp1 = 


10'b0010001000; 


50 


13'b0000000001100 : 
13'b000000Q001101 : 


data_tmp1 = 
data_tmp1 = 


10'b001 0001 101; 
10'b0010010001; 




13'bOOOOOOOOOmO : 


data_tmp1 = 


10'b0010010110; 


55 


13'b0000000001111 : 


data_tmp1 = 


10'b0010011010; 
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13'b0000000010000 


: data_ 


_tmp1 


= 10'b0010011101; 




13'b0000000010001 


: data_ 


Jmp1 


= 10*b0010100001; 


5 


13'b0000000010010 


: data_ 


Jmp1 


= 10'b0010100100; 




13 b000000001001 1 


data_ 


_tmp1 


= 10'b0010100111; 


10 


1 3 b000000001 01 00 


data_ 


_tmp1 


= 10'b0010101010; 


13 b0000000010101 


data_ 


_tmp1 


= 10'b0010101101; 




13^0000000010110 


data_ 


Jmp1 


= 10'b0010101111; 


15 


13 b0000000010111 


data_ 


_tmp1 


= 10'b00101 10010; 




1 3 b000000001 1 000 


data_ 


Jmp1 


= 10'b0010110100; 


20 


13'b000000001 1001 
13'b000000001 1010 


data_ 
data 


_tmp1 
_tmp1 


= 10*b0010110111; 
= 10'b001011100t; 




13'b0000000011011 


data_ 


_tmp1 


= 10'b0010111011; 


25 


13'b0000000011100 


data_ 


_tmp1 


= 10'b00101 1 1 101; 




13'b000000001 1101 


data_ 


_tmp1 


= 10^0010111111; 


30 


13'b0000000011110 
13'b000000001 1111 


data_ 
data_ 


_tmp1 
_tmp1 


= 10'b001 1000001; 
= 10'b0011000011; 




13'b00000001 00000 


data 


_tmp1 


= 10'b0011000101; 


35 


13 b00000001 00001 


data_ 


_tmp1 


= lO'bOOHOOOHO; 




1 3 b00000001 0001 0 


data_ 


_tmp1 


= 10'b001 1001 000; 


40 


1 3 b00000001 0001 1 

a oil r\ r\ r\ r\ r\ r\ r\ a r\c\ a r\ r\ 

13 b0000000100100 


data_ 
data_ 


_tmp1 
_tmp1 


= 10'b0011001010; 
= 10b0011001011; 




13'b0000000100101 


data_ 


_tmp1 


= 10'b0011001101; 


45 


13 b00000001001 10 


data_ 


_tmp1 


= 10*b001 1001 110; 




13 b00000001001 1 1 


data_ 


_tmp1 


= 10 b001 1010000; 


50 


13^0000000101000 
13'b0000000101001 


data_ 
data_ 


_tmp1 
_tmp1 


= 10'b0011010001; 
= 10'b0011010011; 




13'b0000000101010 


data_ 


_tmp1 


= 10'b001 1010100; 


55 


13'b0000000101011 


data_ 


Jmp1 


= 10'b0011010101; 
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13'b0000000101100 : data. 

13'b0000000101101 : data. 

13'b0000000101110 : data. 

13'b0000000101111 : data. 

13'bOOOOOO0 110000 : data. 

13'b0000000 110001 : data. 

13'bOOOOOO0 110010 : data. 

13'b00000001 10011 : data. 

13'b00000001 10100 : data. 

13'b0000000 110101 : data. 

13'b0000000110110 : data. 

13'b0000000110111 : data. 

13'b00000001 11000 : data. 

13'b00000001 11001 : data. 

13'b00000001 11010 : data. 

13'b00000001 11011 : data. 

13'b0000000111100 : data. 

13'b0000000111101 : data. 

13^0000000111110 : data. 

13'b00000001 11111 : data. 

13'b0000001 000000 : data_ 

13'b0000001 000001 : data_ 

13'bOOOOO0 1000010 : data. 

13'b0000001 000011 : data 
13'bOOOOO0 10001 00 : data_ 

13'b0000001000101 : data_ 

13'bOOOOO0 10001 10 : data_ 

13'b0000001000111 : data_ 

13'b000000100100z : data 
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_tmp1 = 


1O'bOO11O10111 


_tmp1 = 


10'b0011011000 


_tmp1 = 


10'b0011011001; 


_tmp1 = 


10'b0011011010; 


_tmp1 = 


10'b001 101 1100; 


_tmp1 = 


10'b0011011101; 


_tmp1 = 


10'b0011011110; 


_tmp1 = 


10'b0011011111; 


tmpi = 


10'b001 11 00000; 


_tmp1 = 


10'b001 11 00001; 


_tmp1 = 


10*b001 1100010; 


_tmp1 = 


10'b001 11 00011; 


tmpi = 


10'b0011100100; 


_tmp1 = 


10'b0011100101; 


_tmp1 = 


10'b0011100110; 


_tmp1 = 


lO'bOOIHOOHI; 


tmpi = 


1O'bOO11101OOO; 


_tmp1 = 


ICbOOHIOIOOl; 


_tmp1 = 


10^0011101010; 


tmpi = 


10'b0011101011; 


_tmp1 = 


1O'b00111011OO; 


_tmp1 = 


10'b001 1101 101; 


_tmp1 = 


10"b001 1 101 110; 


_tmp1 = 
_tmp1 = 


10'b001 1101111; 
10'b001 11011 11; 


_tmp1 = ' 


10'b001 11 10000; 


_tmp1 = ' 


10'b001 11 10001; 


_tmp1 = ■ 


10*b0011110010; 


tmpi = ' 


I0'b001 11 10011; 
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WO 98/19410 

13'bOOOOOOIOOIOIO 

13'b0000001001011 

13'b000000100110z 

13'b0000001001110 

13'b0000001001111 

13'b000000101000z 

13'b0000001010010 

13'b0000001010011 
13'b0000001010100 

13'b0000001010101 

13'b000000101011z 

13'b0000001011000 

13'b0000001011001 
13'b0000001011010 

13'b0000001011011 

13'b000000101110z 

13'b000000101111z 

13'b0000001 100000 

13'bOOOOOOH 00001 
13'b0000001 100010 

13'b0000001 100011 
13'b0000001 100100 

13'b0000001 100101 : 
13'b0000001100110 : 

13'b0000001100111 : 

13'b000000110100z : 

13'b0000001101.01z.: 

13'b000000110110z : 

13'b000000110111z : 

13'b000000111000z : 

13'b000000111001z : 



PCT/US97/18911 



: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmpi 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 

: data_tmp1 • 

: data_tmp1 



: data_tmp1 
: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 ; 
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0'b001 11 10100; 

0*b0011110101; 

0*b0011110110; 

0'b0011110111; 

O'bOOl 11 11000; 

0'b001 11 11001; 

0'b0011111010; 

O'bOOl 11 11011; 
O'bOOl 1111011; 

O'bOOl 11 11 100; 

O'bOOl 11 11101; 

O'bOOl 11111 10; 

O'bOOl 11 111 11; 
O'bOOl 11 111 11, 

O'bOl 00000000; 

O'bOl 00000001; 

0'b0100000010; 

O'b0100000011; 

0'b0100000100; 
0'b0100000100; 

0'b0100000101; 
O'b0100000101; 

O'bOl 000001 10; 
0'b0100000110; 

O'bOl 000001 11; 

O'bOl 00001 000; 

0'b0100001001; 

0'bO1O0001O1O; 

O'b0100001011; 

O'bOl 00001 100; 

0'b0100001101; 
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13'b000000111010z 

13'b000000111011z 

13'b000000111100z 

13'b000000111101z 

13'b000000111110z 
13^0000001111110 

13'b0000001111111 
13'b000001 0000000 

13'b000001 0000001 
13'b000001 0000010 

13'b000001 0000011 
13'b0000010000100 

13'b00000100001z1 
13'b000001 00001 10 



: data_tmp1 

: data_tmp1 

: data_tmp1 

. data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 



13'b000001000100z : data_tmp1 = 



13'b000001000101z 
13'b0000010001100 

13'b0000010001101 
13'b0000010001110 

13'b000001 0001 111 
13'b000001001000z 



data_tmp1 
data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 



35 13'b000001001001z : data_tmp1 = 



13'b000001001010z 
13'b0000010010110 

13'b0000010010111 
13'b000001001100z 



data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 



13'b000001001101z : data_tmp1 = 



13'b000001001110z 
13'b0000010011110 

13'b000001 0011 111 
13'b000001010000z 

13'b000001010001z 
13'b0000010100100 

13'b00000101001z1 
13^0000010100110 



data_tmp1 
: datatmpl 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
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0'b0100001110; 

O'b0100001111; 

0'b01 0001 0000; 

0'b01 0001 0001; 

O'bOl 0001 0010; 
O'bOl 0001 0010;. 

O'b0100010011; 
O'bOl 0001 0011; 

O'b0100010100; 
0'b0100010100; 

O'bOl 0001 01 01; 
O'bOl 0001 01 01; 

O'b0100010110; 
0"b0100010110; 

0'b0100010111; 

O'bOl 0001 1000; 
O'bOl 0001 1000; 

O'bOl 0001 1001; 
O'bOl 0001 1001; 

0'b0100011010; 
0'b0100011010; 

O'bOl 0001 1011; 

O'b0100011100; 
0'b0100011100; 

0'b0100011101; 
O'bOl 0001 11 01; 

0'b0100011110; 

O'b0100011111; 
O'b0100011111; 

0'b0100100000; 
O'b0100100000; 

O'bOl 001 00001; 
O'bOl 001 00001; 

0'b0100100010; 
0'b0100100010; 
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13'b000001010100z : data_tmp1 
13'b0000010101010 : data_tmp1 

13'b0000010101011 :data_tmp1 
5 13'b000001010110z : data_tmp1 

13^00000101011 1z : data_tmp1 
13'b00000101 10000 : data_tmp1 

10 13'b00000101100z1 : data_tmp1 
13'b000001 01 10010 : data_tmp1 

13'b000001011010z : data_tmp1 
13'b0000010110110 : data_tmp1 

15 

13'b0000010110111 :data_tmp1 

data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 



13'b000001011100z : 

13'b000001011101z : 
20 13'b000001011110z : 

13'b000001011111z : 
13'b000001 1000000 : 

25 13'b00000110000z1 : 
13'b000001 1000010 : 

13'b00000110001zz : 

30 13"b000001100100z : 
13'b000001 1001010 : 

13'b000001 1001011 : 
13'b000001100110z : 
35 13'b000001 1001110: 

13'b000001 10011 11 : 
13'b000001101000z : 
13'b000001 1010010 : 

40 

13'b000001 1010011 : 
13'b000001101010z : 

13'b000001 10101 1z : 
45 13'b000001101100z : 

13'b000001101101z : 
13'b000001101110z : 

50 13'b000001101111z : 
13'bOOOOOHIOOOOz : 

13'b000001110001z : 
13"b000001110010z : 

55 

13'b000001110011z : 
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10'b0100100011; 
10'b0100100011; 

10'b0100100100; 
10'b0100100100; 

10'b0100100101; 
10'b0100100101; 

10'b0100100110; 
lO'bOIOOIOOHO; 

10'b0100100111; 
10'b0100100111; 

10'b0100101000; 
10'b0100101000; 

10'b0100101001; 
10'b0100101001; 

10'b0100101010; 
10^0100101010; 

10'b0100101011; 
10'b0100101011; 

10'b0100101100; 

10'b0100101101; 
10'b0100101101; 

10^0100101110; 
10'b0100101110; 
10'b0100101110; 

10^)0100101111; 
10'b0100101111; 
10'b0100101111; 

10'b01001 10000; 
10'b01001 10000; 

10'b0100110001; 
10'b01 001 10001; 

10'b0100110010; 
10'b0100110010;' 

10'b0100110011; 
10'b0100110011; 

10"b0100110100; 
10'b0100110100; 

10'b0100110101; 
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13'b000001 110100Z : data_tmp1 

13'b000001110101z : datajmpl 
1 3'b000001 11011 0z : datajmpl 

13'b000001110111z : data_tmp1 
13'b000001 111000z : datajmpl 

13'b000001111001z : datajmpl 
13'b000001111010z : datajmpl 
13'b0000011110110 : datajmpl 

13'b0000011110111 : datajmpl 
13'b000001111100z : datajmpl 
1 3'bOOOO0 11111010: data Jmp 1 

13^0000011111011 : datajmpl 
1 3'b000001 1 1 1 1 1 0z : datajmpl 
1 3'bOOOOOl 1111110: datajmpl 

1 3'b000001 1111111 : datajmpl 
13'b00001000000zz : datajmpl 

13'b00001 000001 zz : datajmpl 
13'b00001 00001 000 : datajmpl 

13'b00001 00001 Oz1 : datajmpl 
13'b00001 00001 010 : datajmpl 
13'b00001 00001 100 : datajmpl 

13'b00001000011z1 : datajmpl 
13'b0000100001110 : datajmpl 
13'b000010001000z : datajmpl 

13*b000010001001z : datajmpl 
13'b000010001010z : datajmpl 
13'b0000100010110 : datajmpl 

13'b0000100010111 : datajmpl 
13'b00001000110zz : datajmpl 

13'b00001000111zz : datajmpl 
13'b00001 001 00000 : datajmpl 

13'b00001001000z1: datajmpl 
13'b00001 001 00010 : datajmpl 
13'b000010010010z : datajmpl 

13'b000010010011z : datajmpl 
13'b000010010100z : datajmpl 
13'b0000100101010 : datajmpl 

13"b0000100101z11 : datajmpl 
13'b000010010110z : datajmpl 
13'b00001 001011 10 : datajmpl 
13'b00001 001 10000 : datajmpl 
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10'b0100110101; 

10'b0100110110; 
10'b0100110110; 

10'b0100110111; 
10'b0100110111; 

10'b01001 11000; 
10'b01001 11000; 
10'b01001 11000; 

10'b01001 11001; 
10'b01001 11001; 
10'bO100111OO1; 

10'b01001 11010; 
10'b01001 11010; 
10'b01001 11010; 

10'b0100111011; 
10'bO100111O11; 

10'b0100111100; 
10'b0100111100; 

10'b0100111101; 
10'b0100111101; 
10'b0100111101; 

10'b0100111110; 
10'b0100111110; 
1O'bO1O011111O; 

10'b01001 11111; 
10'b01001 11111: 
10'b01001 11111; 

10'bO10100O00O; 
10'b0101000000; 

I0'b0101000001; 
10'b0101000001; 

10'b0101000010; 
10'b0101000010; 
10'bO1010OOO1O; 

10'b0101000011; 
10'b0101000011; 
10'b0101000011; 

10'bO1O1OOO1OO; 
10'bO101OOO10O; 
10'b0101000100; 
10'b0101000100; 
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13'b00001001100z1 
13'b00001001 10010 
13"b00001 001 10102 

13'b00001001 10112 
13'b00001001 11002 
13'b00001001 11010 

13'b000010011l2l1 
13'b0000100111102 : 
13'b0000100111110 
13'b0000101000000 

13'b000010100002l : 
13'b0000101000z10 : 
13'b0000101000102 : 

13'b0000101000111 
13'b00001010010zz : 
13'b0000101001100 

13'b0000101001l2l : 
13'b0000101001110 
13'b000010101000z : 

13'b0000101010zl2 : 
13'b0000l0101010z : 

13"b00001010110z2 : 
13*b000010101110z : 
13'b0000101011110 : 

13'b0000101011111 : 
13'b00001 01 100022 : 
13'b0000101 100100 : 

13'b0000101100l2l : 
13'b0000101100110 : 
13"b00001 01 101002 : 
13'b0000101101010 : 

13'b000010110l2l1 : 
13'b000010110110z : 
13'b0000101101110 : 
13'b0000101 110000 : 

131)0000101110021 : 
13'b00001011102l0 : 
13'b0000101 110102 : 
13'b0000101110111 : 

13'b0000101111022 : 
13'b000010111110z : 
13'b0000101111110 : 



: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: datatmpl 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 
: data_tmp1 

data_tmp1 
: data_tmp1 
data_tmp1 

data_tmp1 ■ 
data_tmp1 

data_tmp1 ■■ 
data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 = 
datatmpl 

data_tmp1 
data_tmp1 
data_tmp1 ■ 
data_tmp1 

data_tmp1 = 
data_tmp1 : 
data_tmp1 
data_.tmp1 

data_tmp1 ■ 
data_trnp1 = 
data_tmp1 = 
data_tmp1 

data_tmp1 = 
data_tmp1 ■ 
data_tmp1 ■ 
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0*b0101000101 
O'b0101000101 
O'b0101000101 

O'b0101000110 
O'b0101000110 
O'b0101000110 

O'b0101000111 
0'b0101000111 
O'b0101000111 
0'b0101000111 

O'bOIOIOOIOOO 
0'b0101001000 
0'b0101001000 

0*b0101001001; 
0'b0101001001; 
0'b0101001001; 

0'b0101001010 
0'b0101001010 
0'b0101001010 

0'b0101001011; 
0'b0101001011; 

0'b0101001100 
0'b0101001100 
0'b0101001100 

0'b0101001101; 
0'b0101001101; 
0'b0101001101; 

0'b0101001110; 
0'b0101001110; 
0'b0101001110; 
0'b0101001110; 



0'b0101001111 
0'b0101001111 
0'b0101001111 
0'b0101001111 

0'b0101010000 

O'boioioioooo 

0'b0101010000 
0'b0101010000 

0'b0101010001 
0'b0101010001 
0'b0101010001 



13^0000101111111 : data_tmp1 = 10'b0101010010; 
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13'b00001100000zz : 
13'b00001 10000102 

13'b00001 100001 1z 
13'b00001100010zz : 

13'b00001 10001 1zz : 
13'b000011001000z 
13'b00001 10010010 

13'b0000110010z11 
13'b000011001010z 
13'b0000110010110 
13'b000011001100z 
13'b00001 1001 1010 

13'b0000110011z11 
13'b000011001110z 
13'b0000110011110 
13'b000011010000z 



data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
datatmpl 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
: data_tmp1 
data_tmp1 



13'b0000110100z1z : data_tmp1 
13'b000011010010z : data_tmp1 
13'b00001 101 01000 : datajmpl 



13'b00001101010z1 
13'bO00011O101z10 
13'b000011010110z 
13'b0000110101111 
13'b00001 10110000 

13'b00001101100z1 
13'b0000110110z10 
13'b000011011010z 
13'b0000110110111 
13'b00001 101 11000 

13'b00001101110z1 
13'b0000110111z10 
13'b000011011110z 
13'b00001101 11111 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



13'b0000111000zzz : data_tmp1 = 
45 13'b0000111001zzz : datajmpl = 



13'b0000111010zzz 
13'b00001 1101 1000 

13'b00001110110z1 
13'b0000111011z10 

^•booooinomoz 

13'b0000111011111 
13'b00001 11 100000 



data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



0'b0101010010; 
O'b0101010010; 

O'b0101010011; 
0'b0101010011; 

0'b0101010100; 
0'b0101010100; 
0'b0101010100; 

0'b0101010101; 
0'b0101010101; 
0'b0101010101; 
0'b0101010101; 
0'b0101010101; 

0'b0101010110; 
0'b0101010110; 
O'bOIOIOIOHO; 
0'b0101010110; 

0'b0101010111; 
0'b0101010111; 
0'b0101010111; 

0'b0101011000; 
O'b0101011000; 
O'b0101011000; 
0'b0101011000; 
0'b0101011000; 

0'b0101011001; 
0'b0101011001; 
0'b0101011001; 
0'b0101011001; 
O'b0101011001; 

0'b0101011010; 
0'b0101011010; 
O'bOIOIOHOlO; 
0'b0101011010; 

O'bOIOIOIIOII; 

0'b0101011100; 

O'b01oioi1101; 
O'b0101011101'; 

O'b0101011110; 
0'b0101011110; 
0'b0101011110; 
0"b0101011110; 
0'b0101011110; 



13'b0d001111000z1 : datajmpl = 10^0101011111; 



SNSDOCID - <WO_ BSlSA'Q^ ' > 



WO 98/19410 



PCT/US97/1891 1 



13"b0000111100z10 : data_tmp1 
13'b000011110010z : data_tmp1 
13'b0000111100111 : data_tmp1 
13'b000011110100z : data_tmp1 

5 

13'b0000111101z1z : data_tmp1 
13'b000011110110z : data_tmp1 
13'b00001 1 1 1 1.000z : data_tmp1 

10 13'b0000111110z1z : data_tmp1 
13'b000011111010z : data_tmp1 
13'b00001 1 1 1 1 100z : data_tmp1 
13'b000011 111 1010 : data_tmp1 

15 13'b0000111111z11 : data_tmp1 
13'b000011111110z : data_tmp1 
13'b000011 111 1110 : data_tmp1 
13'b00010000000zz : data_tmp1 

20 13'b00010000001zz : data_tmp1 
13'b0001 00000 10zz : data_tmp1 
13'b0001 000001 100 : data_tmp1 

13'b00010000011z1 : data_tmp1 
25 13'b0001000001110 : data_tmp1 
1 3'b0001 00001 OOzz : data_tmp1 
13'b000100001010z : data_tmp1 
13'b0001000010110 : data_tmp1 

30 1 3'b0001 00001 z111 : data_tmp1 
13'b00010000110zz : data_tmp1 
13'b000100001110z : data_tmp1 
13'b0001000011110 : data_tmp1 

35 13'b0001000100zzz : data_tmp1 
13'b000100010100z : data_tmp1 

13'b0001000101z1z : data_tmp1 
13'b000100010110z : data_tmp1 
40 13'b0001 00011 OOzz : data_tmp1 

13'b00010001101zz : data_tmp1 
13'b00010001 1 10zz : data_tmp1 
13'b000100011110z : data_tmp1 

45 

1 3'bOO0 1 000 1 1 1 1 1 z : data_tmp 1 
13'b0001001000zzz : data_tmp1 

13'b0001001001zzz : data_tmp1 
50 13'b000100101000z : data_tmp1 

13'b0001001010z1z : data_tmp1 
13'b000100101010z : data_tmp1 
13"b00010010110zz : data_tmp1 
55 13'b0001001011100 : data_tmp1 
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1O'b0101O11111; 
10'b0101011111; 

icboioiomn; 

10'b0101011111; 

10'b01 01 100000; 
10'b0101 100000; 
10'b01 01 100000; 

10'b0101 100001; 
10'b0101 100001; 
10'b0101100001; 
10'b01 01 100001; 

10'b0101 100010; 
10'b0101100010; 
10'b0101100010; 
10'b0101100010; 

1O'b01011O0O11; 
1O'b01O1 100011; 
1O'b01O1 100011; 

10'b0101 100100; 
1O'bO1O11O01OO; 
1O'b0101100100; 
10'b0101100100;. 
1O'b01011OO1OO; 

1O'b01011OO101; 
10'b0101100101; 
1O'b01O11001O1; 
1O'b01011OO101; 

10'b0101100110; 
1O'b01011O0110; 

10'b0101100111; 
lO'bOIOnOOIH; 
10'b0101100111; 

1O'b01O11O1OOO; 
10'b0101 101000; 
10'b0101101000; 

10'b0101101001; 
10'b0101101001; 

10'b0101101010; 
10'b0101101010; 

10'b0101101011; 
10'b0101101011; 
10^0101101011; 
= 10'b0101101011; 
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13'b00010010111z1 
13*b0001001011110 
13'b00010011000zz : 
13'b000100110010z 
13'b0001001100110 

13*b000100110z111 
13'b00010011010zz : 
13'b000100110110z 
13'b0001001101110 
13'b000100111000z 

13'b0001001110z1z : 
13'b000100111010z 
13'b00010011110zz : 
13'b0001001111100 

13^00010011 11 1z1 
13'b0001001111110 
13'b0001010000zzz : 
13'b0001010001000 

13'b00010100010z1 
13'b0001010001z10 
13'b000101000110z 
13^0001010001111 
13'bOOOIOIOOIOOzz 

13'b000101001z1zz : 
13'b00010100110zz 

13'b0001010100zzz : 
13'b00010101010zz 

13'b00010101011zz 
IS'bOOOIOIOIIOzzz 

13'b0001010111zzz 
13"b00010110000zz 

13'b000101100z1zz 
13'b00010110010zz 
13'b000101 1010000 

13'b00010110100z1 
13'b000i011010z10 
IS'bOOOIOIIOIzIOz 
13'b000101 10101 11 
13'b00010110110zz 

13'b000101101111z 
13'b0001011100zzz 
13'b000101110100z 
13'b000101 1101010 



: data_tmp1 ; 
: data_tmp1 
data_tmp1 : 
: data_tmp1 : 
: data_tmp1 

: data_tmp1 
data_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmp1 = 
: data_tmp1 

data_tmp1 = 
: data_tmp1 

: data_tmp1 
: data_tmp1 
data_tmp1 : 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmp1 : 
: data_tmp1 

data_tmp1 ; 
: data_tmp1 

: data_tmp1 
data_tmp1 = 

: data_tmp1 ; 
: data_tmp1 

: data_tmp1 ; 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1. 
: data_tmp1 
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0*b0101101100 
0'b0101101100 
0*b0101101100 
O'b0101101100 
0*b0101101100 

0'b0101101101 
0'b0101101101 
0'b0101101101 
0'b0101101101 
0'b0101101101 

0'b0101101110; 
0'b0101101110; 
O'b0101101110; 
O'b0101101110; 

O'b0101101111; 
0'b0101101111; 
O'b0101101111; 
O'b0101101111; 

O'b0101110000 
O'b0101110000 

o'boiomoooo 

0'b0101 110000 
0'b0101110000 

0'b0101110001; 
0'b01011 10001; 

0'b0101110010; 
O'b0101110010; 

O'b0101110011; 
O'b0101 110011; 

O'b0101110100; 
O'b0101110100; 

O'b0101110101 
O'b0101110101 
0'b0101 110101 

O'b0101110110 
O'b0101110110 

O'boiomono 

0'b0101110110 
O'b0101110110 

O'b0101110111; 
0*b0101110111; 
0'b0101110111; 
0'b0101110111; 



13'b0001011101z11 : data_tmp1 = 10'b0101 1 1 1000; 
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13'b000101110110z 
13'b0001011101110 
13'b0001011110z2z : 

13'b0001011111zzz : 
13'b00011000000zz : 
13'b0001 100000100 
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13'b0001 
13'b0001 
13'b0001 
13'b0001 
13"b0001 
13'b0001 
13'b0001 



1000001z1 

10000z110 

1000010zz : 

1 00001 10z 

100001111 

10001000Z 

100010010 



13'b0001100010z11 : 
13'b000110001z10z : 
13'b000110001z110 
13'b0001 10001 10zz : 
13'b0001 1000111 11 
13'b0001 100100000 

13'b00011001000z1 
13'b0001100100z10 
13'b000110010z10z : 
13'b0001 1001001 11 
13'b00011001010zz : 
13'b0001100101110 

13'b0001100101111 
13'b0001100110zzz : 
13'b00011001110zz : 
13'b0001 10011 110z 

13"b000110011111z 
13'b0001101000zzz : 
13'b00011010010zz : 
13'b0001101001100 

13'b00011010011z1 
13'b0001 101001110 
13'b0001101010zzz : 
13'b0001 10101 10zz': 

13'b0001 101 01.1 1zz : 
13'b0001101100zzz : 
13"b0OO110H0l00z 
13'b0001 101 101010 

13'b0001101101z11 
13'b000110110110z 
13'b0001101101110 
13'b0001101110zzz : 
13'b000110111100z 



; data_tmp1 
: data_tmp1 
data_tmp1 : 

data_tmp1 : 
data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

: data_tmp1 
data_tmp1 

: data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: datatmpl 

data_tmp1 
: data tmpl 

data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 
data_tmp1 

: data_tmp1 

: data_tmp1 
data_tmp1 : 
data_tmp1 

: data_tmp1 

: data_tmp1 
: data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 



124 

0'b0101111000; 
0'b0101111000; 
0'b0101111000; 

0'b0101111001 
0'b0101111001 
O'bOIOHHOOl 

0'b0101111010 
0'b0101111010 
0'b0101111010 
O'b0101111010 
0'b0101111010 
O'b0101111010 
O'b0101111010 

0'b0101111011 
0'b0101111011 
O'bOIOHHOH 
0'b0101111011 
0'b0101111011 
0'b0101111011 

0'b0101111100; 
O'b0101111100; 
O'b0101111100; 
O'bOIOmHOO; 
0'b0101111100; 
0'b0101111100; 

0'b0101111101; 
0'b0101111101; 
0'b0101111101; 
0'b0101111101; 

0'b0101111110; 
0'b0101111110; 
0'b0101 111110; 
0'b0101111110; 

0'b0101111111; 
O'bOl 01111111; 
0"b0101 111111; 
0'b01011 1111 1; 

O'bOl 10000000; 
O'bOl 10000000; 
O'bOl 10000000; 
O'bOl 10000000; 

O'bOl 10000001; 
O'bOl 10000001; 
O'bOII 0000001; 
O'bOl 10000001; 
O'bOl 10000001; 
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13'b0001101111z1z : data_tmp1 
13'b000110111110z : data_tmp1 
13'bOOOIHOOOOzzz : data_tmp1 
13'b000111000100z : data_tmp1 

5 

13'b0001110001z1z : data_tmp1 
13'b00011 10001 10z : data_tmp1 
13'b0001110010zzz : data_tmp1 
13'b000111001100z : data_tmp1 

10 

13'b0001 11001 1z1z : data_tmp1 
13'b0001 11001 11 Oz : data_tmp1 
13'b0001110100zzz : data_tmp1 
13'b000111010100z : data_tmp1 
15 13'b0001 110101010 : data_tmp1 

13'b0001110101z11 :data_tmp1 
13'b00011 10101 10z : data_tmp1 
13'b0001110101110 : data_tmp1 
20 13'b0001110110zzz : data_tmp1 
13'b000111011100z : data_tmp1 
13'b0001 1101 11010 : data_tmp1 

13'bOOOIIIOIHzll : data_tmp1 
25 13'b000111011110z : data_tmp1 
13'b0001 1101 11110 : data_tmp1 
1 3'b0001 1 1 1 0OOzzz : data_tmp1 
13'b00011110010zz : data_tmp1 

30 13'b00011110011zz : data_tmp1 
13'b0001111010zzz : data_tmp1 
13'b00011110110zz : data_tmp1 
1 3'bOO0 1111011100: data Jmp 1 

35 13'b00011110111z1 : data_tmp1 
13'b0001111011110 : data_tmp1 
13'b0001 1 1 1 100zzz : data_tmp1 
13'b00011111010zz : data_tmp1 
13'b0001 1 11101 1 0z : data_tmp1 

40 13'b0001111 101110 : datajmpl 

13'b00011111z1111 : datajmpl 
13'b0001 1 1 1 1 1 0zzz : datajmpl 
13'b00011111110zz : datajmpl 
45 13'b0001 1 11 1 1 110z : datajmpl 
13^0001111111110 : datajmpl 
13'b00 10000000000 : datajmpl 

13'b00100000000z1 : datajmpl 
50 13'b0010000000z10 : datajmpl 
13'b001000000z10z : datajmpl 
13'b001000000z111 : datajmpl 
13'b001 0000001 Ozz : datajmpl 
13'b0010000001110 : datajmpl 
55 1 3'bO0 1000001 OOOz : data Jmp 1 
13'b001 000001 0010 : datajmpl 
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O'bOl 10000010; 
O'bOl 10000010; 
O'bOl 10000010; 
O'bOl 10000010; 

O'bOl 10000011; 
O'bOl 10000011; 
O'bOl 10000011; 
O'bOl 10000011; 

O'bOl 100001 00; 
O'bOl 10000100; 
O'bOl 100001 00; 
O'bOl 10000100; 
I O'bOl 10000100; 

O'bOl 10000101; 
I O'bOl 10000101; 
I0'b0110000101; 
O'bOl 100001 01; 
I0'b0110000101; 
I O'bOl 10000101; 

I O'bOl 100001 10; 
I O'bOl 100001 10; 
I O'bOl 100001 10; 
O'bOl 100001 10; 
O'bOl 100001 10; 

O'bOl 100001 11; 
O'bOl 1 0000111; 
O'bOl 100001 11; 
I O'bOl 100001 11; 

I O'bOl 10001000; 
I O'bOl 10001 000; 
O'bOl 10001 000; 
O'bOl 10001000; 
I O'bOl 10001000; 
I O'bOl 10001000; 

I O'bOl 10001 001; 
O'bOl 10001001; 
O'bOl 10001001; 
I O'bOl 10001 001; 
I O'bOl 10001001; 
I O'bOl 10001 001; 

I O'bOl 10001010; 
IO'bO11OOO1O10; 
O'bOl 10001010; 
IO'bO110OO1O10; 
O'bOl 10001010; 
I O'bOl 10001010; 
I O'bOl 10001010; 
I O'bOl 10001010; 
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1 3'b001 000001 0z11 : data_tmp1 
13'b001 000001 z10z : data_tmp1 
13'b001 000001 z1 10 : datajmpl 
1 3'b001 000001 10zz : data_tmp1 
5 1 3'b001 000001 1111: datajmpl 
13'b001 00001 OOOzz : data_tmp1 
13'b001 00001 001 Oz : datajmpl 

1 3'b001 00001 0z11z : datajmpl 
10 1 3'b001 00001 01 Ozz : datajmpl 
1 3'b001 00001 01 10z : datajmpl 
13'b001 00001 10zzz : datajmpl 

1 3'b001 00001 11 zzz : datajmpl 
15 13'b0010001000zzz : datajmpl 
13'b001 0001 001 Ozz : datajmpl 

13*b001 0001 001 1zz : datajmpl 
13'b0010001010zzz : datajmpl 
20 1 3'b001 0001 011 Ozz : datajmpl 
13'b001000101110z : datajmpl 
13'b0010001011110 : datajmpl 

13'b0010001011111 : datajmpl 
25 1 3'b001 0001 1 0zzzz : datajmpl 
13'b001000111000z : datajmpl 
13'b0010001 110010 : datajmpl 

13'b0010001110z11 : datajmpl 
30 1 3'b001 0001 1 1z1 Oz : datajmpl 
13'bOO10OO111z110 : datajmpl 
13'b00100011110zz : datajmpl 
13'b0010001111111 : datajmpl 
13'b00100100000zz : datajmpl 
35 1 3'b001 001 00001 Oz : datajmpl 
13'b001 001 00001 10 : datajmpl 

13'b001001000z111 : datajmpl 
13'b00100100z10zz : datajmpl 
40 1 3'bO0 1001 0001 10z : datajmpl 
13'b0010010001110 : datajmpl 
13'b0010010010zzz : datajmpl 

13'b00100100111zz : datajmpl 
45 1 3'b001 001 01 Ozzzz : datajmpl 
13'b001 001 01 10000 : datajmpl 

• 13'b001001O1100z1 : datajmpl 
13'b0010010110z10 : datajmpl 

50 1 3'bO0 1 00 1 0 1 1 z 1 0z : data Jmp 1 
13'b001001011z111 : datajmpl 
13'bOO1001O1110zz : datajmpl 
13'b0010010111110 : datajmpl 
13'b00100110000zz : datajmpl 

55 13'b001001100010z : datajmpl 
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I0'b0110001011; 
0'b0110001011; 
I O'bOl 10001011; 
O'b0110001011; 
I0'b0110001011; 
O'bOl 10001011; 
I0'b0110001011; 

O'bOl 10001 100; 
O'bOl 10001 100; 
I O'bOl 10001 100; 
O'bOl 10001 100; 

O'bOl 10001 101; 
0'b0110001101; 
O'bOl 10001 101; 

O'bOl 10001 110; 
O'bOl 10001 110; 
I O'bOl 10001 110; 
I O'bOl 10001 110; 
I0'b0110001110; 

I0'b0110001111; 
O'bOl 10001 111; 
I0'b0110001111; 
10'b0110001111; 

I O'bOl 10010000; 
I O'bOl 10010000; 
I O'bOl 10010000; 
I O'bOl 10010000; 
1 0'bOl 10010000; 
I O'bOl 10010000; 
I O'bOl 10010000; 
1 0'bOl 10010000; 

I O'bOl 10010001; 
I O'bOl 10010001; 
I0'b0110010001; 
10'b0110010001; 
I O'bOl 10010001; 

I0'b0110010010; 
O'bOl 10010010; 
10'b01 10010010; 

10'b0110010011; 
10'b0110010011; 
I0'b0110010011; 
10'b0110010011; 
I0'b0110010011; 
10'b0110010011; 
I0'b0110010011; 
10'b0110010011; 
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13'b001001100z11z 
13'b00100110z10zz : 
13'b001001100110z 
13'b0010011010zzz : 

13'b00100110111zz 
13'b001001110zzzz : 
13*b001001111000z 

13'b0010011110z1z : 
13'b001001111z10z 
13'b00100111110zz : 
13'b001001111111z 
13'b0010100000zzz : 

13'b0010100001zzz : 
13'b0010100010zzz : 
13'b00101000110zz : 
13'b001010001110z 
13'b0010100011110 

13'b0010100011111 
13'b001010010zzzz : 
13'b00101001100zz : 
13'b001010011010z 

13'b001010011z11z : 
13'b00101001110zz : 
13'b001010011110z 
13'b0010101000zzz : 
13'b00101010010zz : 
13'b001010100110z 

13'b00101010z111z : 
13'b0010101010zzz : 
13'b00101010110zz : 
13'b001010101110z 
13*b00101011000zz : 
13'b001010110010z 

IS'bOOIOIOIIOzllz : 
13'b00101011z10zz : 
13'b00101011z110z : 
13'b0010101110zzz : 
13'b0010101111110 

13^0010101111111 
13'b001011000zzzz : 
13'b0010110010zzz : 

13'b0010110011zzz : 
13'b001011010zzzz : 
13'b0010110110000 

13'b00101101100z1 
13'b0010110110z10 
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: data_tmp1 
: data tmpl 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 ■ 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 : 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 

: data_tmp1 
data_tmp1 

: data_tmp1 

: data_tmp1 
data_tmp1 = 
data_tmp1 

data_tmp1 
data_tmp1 : 
: data_tmp1 

: data_tmp1 
: data_tmp1 
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0'b0110010100; 
0'b01 10010100; 
0'b01 10010100; 
O'b0110010100; 

0'b0110010101; 
0'b0110010101; 
0"b0110010101; 

O'b0110010110 
0'b0110010110 
0'b0110010110 
0'b01 100101 10 
0'b0110010110 

0'b01 100101 11 
0'b01 100101 11 
0'b01 100101 11 
0'b01 100101 11 
0'b0110010111 

0'b01 1001 1000; 
0'b01 1001 1000; 
0'b01 1001 1000; 
0'b01 1001 1000; 



0'b0110011001 
0'b01 1001 1001 
0'b01 1001 1001 
0'b01 1001 1001 
0'b01 1001 1001 
0'b01 1001 1001 

0'b0110011010 
0'b0110011010 
0'b0110011010 
0'b01 1001 1010 
0'b01 1001 1010 
0'b0110011010 

0'b0110011011; 
0'b0110011011; 
0'b0110011011; 
0'b0110011011; 
0'b0110011011; 

0'b01 1001 1100; 
0'b01 10011100; 
0'b01 1001 1100; 

0'b0110011101; 
CbOHOOIHOI; 
0'b0110011101; 

0'b0110011110; 
0'b0110011110; 
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13'b001011 
13'b001011 
13'b001011 
13'b001011 
13'b001011 
13'b001011 
13'b001011 



011z10z 
011z111 

omozz 

0111110 
1000zzz 
100100z 
1001010 



data_tmp1 
: data_tmp1 

data_tmp1 
: data_tmp1 

data_tmp1 
: data_tmp1 
: data_tmp1 



13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'b00101 



11001z11 
110z110z 
110z1110 
11010zzz 
110110zz 
11011111 
111000zz 
11100100 



13'b00101111001z1 
13'b001011110z110 
13'b00101111z10zz 
13'b00101111z110z 
13"b0010111l2l111 
13'b0010111110zzz 
13'b0010111111110 

13'b001100000zzzz : 
13'b001 1 00001 Ozzz : 
13'b001 100001 10zz : 

13'b001 100001 11zz : 
13'b001100010zzzz : 
13'b001 10001 100zz : 
13'b001100011010z 
13'b0011000110110 

13'b001100011z111 
13'b001 10001 11 Ozz : 
13'b001 10001 1110z 
13^0011000111110 
13'b001100100zzzz : 
13'b00110010100zz : 

13'b001100101z1zz : 
13'b00110010110zz : 
13'b001100110zzzz : 

13'b001100111zzzz : 
13'b0011010000zzz : 
13'b00110100010zz 
13'b001 1010001 10z 

13'b00110100z111z 
13'b0011010010zzz : 
13'b001 101 0011 Ozz 
13'b001101001110z 
13'b0011010100zzz : 



: data 
data] 

: data' 
data] 
data] 

: data" 
data] 

: data 

: data. 
: data] 
data" 
: data" 
: data] 
data" 
: data" 



_tmp1 
_tmp1 
]tmp1 
tmp1 
]tmp1 
Jmp1 
Jtmpl 
i_tmp1 

_tmp1 
tmp1 
]tmp1 
]tmp1 
]tmp1 
]tmp1 
Jmp1 



data_tmp1 : 
data_tmp1 : 
data_tmp1 

data_tmp1 
data_tmp1 = 
data_tmp1 
data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 = 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 
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0'b0110011110 
O'bOHOOHHO 
0'b0110011110 
0'b0110011110 
0'b0110011110 
0'b0110011110 
O'b0110011110 



0'b011001111 
0'b011 001111 
O'bOl 10011 11 
0'b011001111 
O'bOl 1001111 
O'bOl 1001111 
0'b011001111 
O'bOl 1001 111 



O'bOl 10100000 
O'bOl 10100000 
O'bOl 10100000 
O'bOl 10100000 
O'bOl 101 00000 
O'bOl 10100000 
O'bOl 10100000 

O'bOl 10100001 
O'bOl 10100001 
O'bOl 10100001 



O'bOl 10100010; 
O'bOl 101 00010; 
O'bOl 10100010; 
O'bOl 10100010; 
O'bOl 10100010; 

O'bOl 10100011; 
O'b0110100011; 
O'b0110100011; 
0'b0110100011; 
O'bOl 10100011; 
0'b0110100011; 

0'b0110100100; 
O'b0110100100; 
O'bOl 10100100; 



O'bO1101OO1O1 
0'b0110100101 
0'b0110100101 
O'bOl 10100101 

0'b0110100110 
0'b0110100110 
O'b0110100110 
0'b0110100110 
O'bO1101OO11O 
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13'b001101010100z : data_tmp1 
13'b001 1010101010 : data_tmp1 



PCT/US97/18911 



13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 

13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 

13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 



1010101Z11 
10101z110z 
10101z1110 
10101 10zzz 
10101 110zz 
1010111111 
1011000zzz 
101100100z 

1011001z1z 
10110z110z 
1011010zzz 
10110110zz 
101101111Z 
1011100zzz 
1011101000 

10111010z1 
1011101z10 
10111z110z 
101 1 1z1 111 
1011110zzz : 
10111 110zz 
1011111110 
1100000zzz : 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b00111000z1zzz : 

13'b0011100010zzz 

13'b0011100100zzz 

13'b00111001z1zzz 
13'b0011100110zzz 
13'b0011101000zzz 

13'b00111010z1zzz 
13'b0011101010zzz 
13'b0011101100zzz 
13'b001 1101 101000 



13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 



11011010z1 
1101101z10 
11011z110z 
11011z1111 
1101110zzz : 
1101-1 11 Ozz 
1101111110 
1110000zzz : 
11 10001 OOz 
1110001010 



data_ 
data] 
data] 
data] 
data] 
data" 
data] 
data" 



_tmp1 
tmp1 
]tmp1 
]tmp1 
]tmp1 
tmp1 
]tmp1 
tmp1 



13'b0011110001z11 
13'b00111100z110z 

i^boonnoozino 



data_tmp1 = 
data_tmp1 : 
data_tmp1 

data_tmp1 : 

data_tmp1 

data_tmp1 

data_tmp1 = 
data_tmp1 
data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 



129 

o'bonoioono; 

O'bOl 101 001 10; 



0'b0110100111 
O'b01 101001 11 
O'bOl 101001 11 
O'b0110100111 
O'bOl 101001 11 
O'b0110100111 
0'b0110100111 
O'bOl 101 001 11 

0'b0110101000 
O'bOl 10101000 
O'b0110101000 
O'bOl 101 01 000 
0'b0110101000 
0'b0110101000 
0'b0110101000 

0'b0110101001 
0'b0110101001 
0'b0110101001 
0'bO1101O1O01 
0'b0110101001 
0'b0110101001 
0'b0110101001 
0'b0110101001 

0'b0110101010 
0'b0110101010 
0'bO1101O1O10 

0*bO1101O1O11 
O'b0110101011 
0'b0110101011 



0'b0110101100; 
O'b0110101100; 
0'bO11O1O11O0; 
O'b0110101100; 

0'b0110101101 
0'b0110101101 
0'b0110101101 
0'b0110101101 
0'b0110101101 
0'b01101G1101 
0'bO11O1O11O1 
O'b0110101101 
0'b0110101101 
0'b0110101101 

O'b0110101110; 
O'b0110101110; 
0'b0110101110; 
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13'b0011110010zzz : data_tmp1 = 10'b01 10101 110; 
13'b00111100110zz : data_tmp1 = 10'b01 10101 110; 
13'b0011110011111 : data_tmp1 = 10'b01 10101 1 10; 
13'b0011110100zzz : data_tmp1 = 10'b01 10101 1 10; 
13'b00111101010zz : data_tmp1 = 10'b01 10101 1 10; 
13'b001 11 10101 100 : data_tmp1 = 10'b01 10101 1 10; 



13'b001 11 10101 1z1 :data_tmp1 = 10'b01 10101 111 
13'b00111101z1110 : data_tmp1 = 10'b01 10101 1 1 1 
13'b001 11 1011 Ozzz : data_tmp1 = 10'b0110101111 
13'bOOIIIIOIHOzz : data_tmp1 = 10'b01 10101 1 1 1 
13'b001111011110z : data_tmp1 = 10'b01 10101 111 
13^0011110111111 : data_tmp1 = 10'b01 10101 111 
13'b001111100zzzz : data_tmp1 = 10'b01 10101111 

13'b001111101zzzz : data_tmp1 = 10'b01 101 10000; 
13'b001111110zzzz : data_tmp1 = 10'b01 101 10000; 
13'b00111111100zz : data_tmp1 = 10'b01 101 10000; 

13'b001111111z1zz : data_tmp1 = 10'b01 101 10001 
13'b00111111110zz : data_tmp1 = 10'b01 101 10001 
13'b010000000zzzz : data_tmp1 = 10'b01 101 10001 
1 3'b01 0000001 Ozzz : data_tmp1 = 10'b01 101 10001 

13'b0100000011zzz : data_tmp1 = 10'b0110110010 
1 3'b01 000001 Ozzzz : data_tmp1 = 10'b01 101 10010 
13'b01 0000011 Ozzz : data_tmp1 = 10'b01 101 10010 
13'b01 000001 110zz : data_tmp1 = 10'b0110110010, 
13'b0100000111100 : data_tmp1 = 10'b01 10110010 

13'b01000001111z1 :data_tmp1 = 10'b01 101 10011; 
13'b0100000111110 : data_tmp1 = 10'b01 101 1001 1 ; 
1 3'b01 00001 Ozzzzz : data_tmp1 = 10'b01 101 1001 1 ; 
13'b010000110000z : data_tmp1 = 10'b01 101 1001 1 ; 

13'b0100001100z1z : data_tmp1 = 10'b01 10110100 
13'b010000110z10z : data_tmp1 = 10'b01 101 10100 
13'b01000011z10zz : data_tmp1 = 10'b01 101 10100 
13'b01000011z111z : data_tmp1 = 10'b01 101 10100 
13'b01 00001 11 Ozzz : data_tmp1 = 10'b01 10110100 
13'b010000111110z : data_tmp1 = 10'b0110110100 
13"b0100010000zzz : data_tmp1 = 10'b01 101 10100 

13'b01000100z1zzz : data_tmp1 = 10'b01 101 10101 
1 3'b01 0001 001 Ozzz : data_tmp1 = 10'b01 101 10101 
13'b0100010100zzz : data_tmp1 = 10'b0110110101 
13'b01000101010zz : data_tmp1 = 10'b01 101 10101 
13:b010001010110z : data_tmp1 = 1O'b01 101 10101 
13'b0100010101110 : data_tmp1 = 10'b01 101 10101 



13'b01000101z1111 :data_tmp1 = 10'b01 101 101 10; 
13'b0100010110zzz : data_tmp1 = 10'b0110110110; 
13'b01000101110zz : data_tmp1 = 10'b01 101 10110; 
13'b010001011110z : data_tmp1 = 10'b01 101 10110; 
13'b0100010111110 : data_tmp1 = 10*b01101 101 10; 
13'b010001100zzzz : data_tmp1 = 10'b0110110110; 
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1 3'b0 10001 101 OOzz 


data 


_tmp1 




10'b0110110110; 


13'b010001101010z 


: data' 


_tmp1 


= 


10'b0110110110; 


13'b0100011010110 


: data" 


_tmp1 


= 


10'b0110110110; 


13'b010001101z111 


: data. 


_tmp1 


— 


10'b0110110111; 


13'b0100011z110zz : 


dataj 


_tmp1 




10'b0110110111; 


13"b0100011z1110z 


data_ 


~tmp1 




10'b0110110111; 


13 b0 10001 1z1 1 1 10 


. data_ 


_tmpl 




a r\i l~ r*\ a a r\ a a r\ a a a . 

10 b01 101 101 1 1 ; 


13'b010001110zzzz : 


dataj 


_tmp1 


— 


10'b0110110111; 


13'b0100011110zzz : 


data_ 


Jmp1 


= 


10^0110110111; 


13'b010001 1111111 


: data. 


_tmp1 


= 


10'b01101 11000; 


13b01001000zzzzz . 


data_ 


tmpi 




10 b01 101 1 1000; 


13'b0100100100zzz : 


data_ 


tmp1 


= 


10'b0110111000; 


13'b01001001z1zzz : 


data_ 


tmpi 


= 


10'b01 101 11001; 


13'b0100100110zzz : 


data_ 


~tmp1 


— 


10'b0110111001; 


13'b010010100zzzz : 


data_ 


_tmp1 


— 


10'b01 101 11001; 


13'b0100101010000 


: data. 


_tmp1 


— 


10'b0110111001; 


13'b01001010100z1 


: data_ 


_tmp1 


= 


10'b0110111010; 


13b0100101010z10 


: data_ 


tmpi 




10 b01 101 1 1010; 


13'b010010101z10z 


data_ 


tmpi 


= 


10'b0110111010; 


13'b010010101z111 


: data_ 


_tmp1 




10'b0110111010; 


13'b0100101z110zz : 


data_ 


tmpi 


— 


10'b0110111010; 


13'b0100101011110 


: data" 


Ltmpl 




10'b01 101 11010; 


1 3'b01 00101 lOzzzz : 


dataj 


tmpi 


= 


10'b0110111010; 


j All A /"\ ^\ A f~\ AAA f\ — 

13b0100101 1 10zzz 


data_ 


_tmp1 




10 b01101 1 1010; 


13'b01001011111zz 


data_ 


Jmp1 


— 


10'b0110111011; 


13'bOIOOIIOOzzzzz : 


dataj 


tmpi 


— 


10'b01101 1 101 1 ; 


13'b01001101000zz 


■ data_ 


Jmp1 




10'b0110111011; 


13'b010011010010z 


: data_ 


_tmp1 


— 


10'b0110111011; 


13'b0100110100110 


: data" 


_tmp1 


— 


10'b01101 11011; 


13'b010011010z111 


: data_ 


_tmp1 


— 


10'b0110111100; 


13'b01001101z10zz 


data_ 


_tmp1 


— 


10'b0110111100; 


13b01001101z110z 


. data_ 


t »-n-t m-L -1 

jmpi 




a n>u a <i a r\ a a a a r\r\ . 

10 b01 101 1 1 100; 


13'b01001101z1110 


: data" 


Jmp1 


— 


10'b0110111100; 


13'b0100110110zzz 


data^ 


_tmp1 


= 


10'b01101 1 1 100; 


13^0100110111111 


: data. 


Jmp1 


= 


10'b0110111100; 


13*b010011100zzzz : 


data_ 


_tmp1 




10'b01 101 1 1 100; 


13'b010011101000z 


: data_ 


_tmp1 




10'b0110111100; 


13'b0100111010010 


: data" 


_tmp1 


= 


10'b0110111100; 


13'b0100111010z11 


: data_ 


Jmp1 


- 


10'b01 101 11101; 


13'b010011101z10z 


: data^ 


_tmp1 


= 


I'O'bOHOHHOI; 


13 b0 100 11 10121 10 


. data_ 


_tmp1 




a r\*i~ r\ a a r\ a a a a r\ A . 

10 b01 101 1 1 101; 


13'b0100111z110zz 


data^ 


tmpi 


— 


10"b011011 1 101; 


13^0100111011111 


: data" 


_tmp1 




10'b01 101 1 1 101; 


13'b010011110zzzz : 


dataj 


_tmp1 




10'b01 101 1 1 101 ; 


13'b0100111110zzz 


data" 


~tmp1 




10*b01101 1 1 101 ; 


13'b010011111110z 


; data_ 


_tmp1 




10'b011011 1 101; 


13^0100111111110 


: data" 


_tmp1 




10'b0110111101; 


13'b0100111111111 


: data 


__tmp1 




10'b0110111110; 
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13'b01010000zzzzz : data_tmp1 = 
13'b0101000100zzz : data_tmp1 
13'b0 101 0001 010zz : data_tmp1 
13'b0101 000101 100 : data_tmp1 



13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 

13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 



000101 1z1 
0001z1110 
000110zzz 

ooomozz 

00011110Z 
000111111 
00100zzzz : 
001010zzz 
00101 100z 
001011010 

001011Z11 
001z1110z 
001Z11110 
00110zzzz 

oomozzz 

0011110ZZ 
001111111 
OlOOOOzzz 
01000100z 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 ; 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b010101 
13'b010101 
13'b010101 
13'b010101 
13'b010101 
13'b010101 
13'b010101 



0001z1z : 
00z110z 
OzlOzzz : 
00110zz 
001111Z 
OlOzzzz : 
011100z 



: data 
: data 
: data 
data_ 
data" 
: data. 
: data 
: data 
: data 

: data_ 
: data] 
data.] 
: data 
data" 
data J 
data 



_tmp1 
]tmp1 
tmp1 
tmp1 : 
]tmp1 
^tmpl 
i_tmp1 
_tmp1 
_tmp1 

tmp1 
]tmp1 
tmp1 
]tmp1 
Jmp1 
tmp1 
_tmp1 
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10^0110111110; 
10'b01 10111110; 
10'b01 10111 110; 
= 1O'bO11O111110; 



10^0110111111 

10^0110111111 

10^0110111111 
10^0110111111 
10^0110111111 

= 10^0110111111 
10'b01 10111 111 
10^0110111111 
10'b0110111111 

= 10'b0110111111 



10'b01 11000000; 

10*b01 11000000; 

10'b01 11000000; 

10'b01 11000000; 

10'b01 11000000; 

10'b01 11000000; 
= 10'b01 11000000; 

10'b01 11000000; 
■ 10'b01 11000000; 



10'b01 
10'b01 
10'b01 
10'b01 

' 10'b01 
10'b01 

= 10*b01 



11000001; 
11000001; 
11000001; 
11000001; 
11000001; 
11000001; 
11000001; 



13'b0101010111z1z 
13'b010101011110z 
13'b01010110zzzzz : 
13^0101011 100zzz 
13'b010101110100z 
13'b0101011101010 



: data_tmp1 
: data_tmp1 
data_tmp1 : 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 
13'b0101 



011101z11 

0111z110z 

0111z1110 

011110zzz : 

0111110zz 

011111111 

1 OOOOzzzz : 

100010zzz 

1000110zz 



data_ 
data" 
data_ 
data,] 
data_ 
data] 
dataj 
data_ 
data 



tmp1 

]tmp1 

]tmp1 

tmp1 

tmp1 

_tmp1 

tmp1 : 

tmp1 

jtmpl 



13'b0101100z111zz 
1 3'b0 1011 001 Ozzzz 
13'b0101100110zzz 
13'b01011001110zz 
13'b0101101000zzz 



data_tmp1 
data_tmp1 
data_tmp1 
: data_tmp1 
data_tmp1 



10'b0111000010; 
= 10'b01 11000010; 

10'b01 11000010; 

10'b01 11000010; 
: 10'b01 11000010; 
= 10'b0111000010; 



10'b01 11000011 
10'b01 11000011 
10'b01 11000011 
10'b0111000011 
10'b01 11000011 
■ 10'b01 11000011 
10'b01 11000011 
10'b01 11000011 
10'b0111000011 

10'b01 11000100 
1O'bO111O0O1OO 
10'b0111000100 
10'b01 11000100 
1O'b01 11000100 
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13'b01011010010zz 


data_ 


_tmp1 




10'b01 11000100; 


13'b010110100110z 


: data 


Jmp1 


= 


10'b01 110001 00; 


13'b0101101001110 


: data] 


tmp1 


= 


10'b01 11000100; 


13'b01011010z1111 


: data_ 


Jmp1 




10'b0111000101; 


13b0101101z10zzz : 


data_ 


_tmp1 




10'b01 11000101; 


13'b0101101z110zz 


data_ 


]tmp1 




10'b01 11000101; 


13'b0101101z1110z 


data_ 


]tmp1 


— 


10*b0111000101; 


13'b0101101z11110 


: data" 


Jmp1 


— 


10'b01 11000101; 


13'b010110110zzzz : 


data J 


_tmp1 


= - 


10'b0111000101; 


13'b0101101111111 


: data. 


_tmp1 




10'b01 11000101; 


13'b010111000000z 


: data] 


_tmp1 


— 


10'b0111000101; 


13'b0101110000z1z 


data_ 


Jmp1 


— 


10'b01 110001 10; 


13'b010111000z10z 


data" 


_tmp1 




10'b01 110001 10; 


13'b01011100z10zz 


data^ 


]tmp1 


= 


10'b01 110001 10; 


13b01011100z111z 


data_ 


]tmp1 




10'b01 1 10001 10; 


13'b0101110010zzz 


data^ 


_tmp1 





10'b01 110001 10; 


13'b010111001110z 


: data_ 


_tmp1 


= 


10'b01 1 10001 10; 


13'b010111010zzzz : 


data J 


_tmp1 


— - 


10'b01 110001 10; 


13'b01011101100zz 


data_ 


_tmp1 


- 


10'b01 110001 10; 


13'b010111011010z 


: data_ 


_tmp1 


= ■ 


10'b01 110001 10; 


13^0101110110110 


: data 


tmp1 


= 


10'b01 110001 10; 


13b010111011z111 


: data_ 


_tmp1 




10'b01 110001 11; 


13'b01011101110zz 


: data_ 


_tmp1 


_ 


10'b01 110001 11; 


13'b010111011110z 


: data_ 


_tmp1 


= 


10'b01 110001 11; 


13'b0101 110111110 


: data 


tmp1 


= 


10'b01 110001 1 1; 


1 3'b0 10111 1 0zzzzz : 


data_ 


tmp1 




I0*b01 110001 11; 


l^bOIOIHHOOzzz 


data_ 


_tmp1 




10'b011 10001 1l'; 


13 b0101 1 1 1 1010zz 


: data" 


Jmp1 


= 


10'b01 110001 11; 


13'b01011111z11zz 


data_ 


_tmp1 


= 


10'b01 11001000; 


13'b0101111110zzz 


data' 


]tmp1 


= 


10'b01 11001 000; 


13'b01011111110zz 


: data" 


Jmp1 




10'b01 11001000; 


13'b01100000zzzzz : 


dataj 


~tmp1 




I0'b01 11001000; 


13'b011000010000z 


: data. 


Jmp1 


— 


10'b01 11001000; 


13'b0110000100z1z 


: data_ 


_tmp1 




10'b0111001001; 


13'b011000010z10z 


: data] 


"tmp1 




10'b0111001001; 


13 b01 100001z10zz 


data_ 


tmpi 




10b0111001001; 


13'b01100001z111z 


: data" 


_tmp1 


— 


10'b0111001001; 


13'b01 100001 10zzz 


data" 


_tmp1 


= 


10'b0111001001; 


13'b01 100001 1110z 


: data" 


_tmp1 




1 0'bOl 11001001; 


13'b01 10001 OOzzzz : 


data J 


_tmp1 




10'b0111001001; 


13'b0110001010zzz 


data_ 


_tmp1 


— 


10'b01 11001001; 


13'b0110001011000 


: data" 


_tmp1 


- 


10'b0111001001; 


13'b01 1000101 10z1 


: data_ 


_tmp1 




10'b01 11001010; 


13'b0110001011z10 


: data_ 


_tmp1 




10'b0111001010; 


13'b0110001z1110z 


: data_ 


_tmp1 




10'b0111001010; 


13^)011000^11111 


: data_ 


Jmp1 




10'b0111001010; 


13'b01 10001 10zzzz : 


data J 


_tmp1 




10'b01 11001010; 


13'b01 10001 11 Ozzz 


data_ 


Jmp1 




10'b0111001010; 


13'b01 10001 1110zz 


: data" 


Jmp1 




1O'b0111001O10; 


13'b0110001111110 


: data] 


Itmpl 




10^0111001010; 
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13'b011001000zzzz : data_tmp1 = 
13'b01 10010010000 : data_tmp1 : 

13'b01100100100z1 :data_tmp1 = 
5 13'b0110010010z10 : data_tmp1 = 
13'b011001001z10z : data_tmp1 = 
13'b011001001z111 :data_tmp1 = 
13'b0110010z110zz : data_tmp1 = 
13'b0110010z11110 : data_tmp1 = 

10 13'b011001010zzzz : data_tmp1 = 
13'b01 100101 10zzz : data_tmp1 = 
13'b01 100101 1 1 10z : data_tmp1 = 
13'b0 11 001 0111111 :data_tmp1 
13'b0110011000zzz : data_tmp1 = 

15 13'b011001100100z : data_tmp1 = 
13'b01 1001 1001010 : data_tmp1 

13'b0110011001z11 :data_tmp1 = 
13'b01100110z110z : data_tmp1 = 

20 13'b01 1001 10z1 110 : data_tmp1 = 
13'b0110011z10zzz : data_tmp1 = 
13'b0110011z110zz : data_tmp1 = 
13'b0110011z11111 :data_tmp1 ■ 
13'b011001110zzzz : data_tmp1 = 

25 IS'bOHOOIIHIIOz : data_tmp1 
13'b011001 1111110 : data_tmp1 
13*b01101000000zz : data_tmp1 : 
13'b01 10100000100 : data_tmp1 

30 13*b01 101 000001 z1 : data_tmp1 
13'b011010000z110 : data_tmp1 
13'b01101000z10zz : data_tmp1 •■ 
13'b01101000z110z : data_tmp1 ■ 
13'b01101000z1111 :data_tmp1 

35 13'b0110100z10zzz : data_tmp1 = 
13'b0110100z11110 : data_tmp1 
13'b011010010zzzz : data_tmp1 = 
13'b01101001110zz : data_tmp1 
13'b01 101001 1110z : data_tmp1 

40 13^0110100111111 : data_tmp1 

13'b01101010zzzzz : datajmpl = 
13"b01101O110zzzz : data_tmp1 = 
13'b0110101110zzz : datajmpl • 
45 13"b01 10101 1 1 10zz : data_tmp1 

13'b01101011111zz : data_tmp1 
13'b01101100zzzzz : data_tmp1 = 
13'b011011010zzzz : data_tmp1 ■ 
50 13'b0110110110zzz : datajmpl 
13'b0110110111000 : data_tmp1 

13'b01101101110z1 :data_tmp1 
13'bOIIOIIOIHzlO : data_tmp1 
55 13'b01 101 101 1 1 10z : datajmpl' 
13^0110110111111 :data_tmp1 
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10'b0111001010; 
= 10*b0111001010; 



10'b0111001011 
10*b01 11001011 
10'b0111001011 
10'b0111001011 
10'b01 11001011 
10'b0111001011 
10'b0111001011 
10'b0111001011 
10'b01 11001011 

= 10'b0111001011 
10'b0111001011 
10'b0111001011 

■ 10'b0111001011 



10'b01 11001 100; 

10'b01 11001 100; 

10'b01 11001 100; 

10'b01 11001 100; 

10'b0111001100; 

10'b01 11001 100; 

10'b01 11001 100; 
■ 10'b0111001100; 
= 10'b01 11001 100; 

10'b01 11001 100; 
= 10'b01 11001 100; 



10'b0111001101 
■■ 10'b0111001101 

10'b0111001101 

10'b0111001101 
= 10*b01 11001 101 

10'b0111001101 

= lO'bomoonoi 

10'bO1110011O1 
10'b01 1 1001 101 
= 10'b0111001101 
= 10'b01 11001 101 

10'b0111001110 
10^0111001110 
10'b0111001110 
■ 10'b0111001110 



10'b0111001111; 
10'b01 11001 111; 
10^0111001111; 
10'b01 11001 111; 
= 10'b01 1 1001 111 ; 

= 10"b01 11010000 
= 10'b01 11010000 
= 10'bOl 1101 0000 
■ 10'b01 11010000 
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1 3'b01 10111 Ozzzzz : data_tmp1 
1 3'b01 101111 Ozzzz : data_tmp1 
1 3'b01 1011111 Ozzz : data_tmp1 
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20 



25 



30 



35 
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13'b0110111111zzz : 
13'b01110000zzzzz : 
13'b01 11 0001 Ozzzz : 
13'b011 10001 100zz : 
13'b011 10001 1010z 
13'b01 110001 10110 

13'b011100011z111 
13"b01 110001 11 Ozz 
13'b011 10001 1110z 
13^0111000111110 
13'b01 11 001 Ozzzzz : 
13'b01 110011 Ozzzz : 
13'b01 11001 11 Ozzz : 



data_tmp1 
data_tmp1 = 
data_tmp1 : 
: data_tmp1 
: datajmpl 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 : 
data_tmp1 
data_tmp1 



13'b0111001111zzz : data_tmp1 
13'b01110100zzzzz : data_tmp1 ■ 
13'bO11101O10zzzz : data_tmp1 
13'b01 1101011 Ozzz : data_tmp1 
13'bOH 10101 1100z : data_tmp1 



13'b0111010111z1z 
13'b011101011110z 
13'b01 11 011 Ozzzzz : 
13'b01 1101 11 Ozzzz 
13'bOIIIOIHIOzzz 
13'b01110111110zz 
13'b01 11011 1 1 1100 



: data_tmp1 
: data_tmp1 
data_tmp1 : 
; data_tmp1 ■ 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b01 1 101 1 1 1 11z1 : datajmpl 
13'b01 1101 11 11110 : datajmpl 
13'b0111100zzzzzz : data_tmp1 = 
13'b01 11 101000000 : datajmpl 

13'b01111010000z1 : datajmpl 
13'b0111101000z10 : datajmpl 
13'b011110100z10z : datajmpl 
13'b011110100z111 : datajmpl 
13'b01111010z10zz : datajmpl 
13'bOIIHOIOzlllO : datajmpl 
13'b0111101z10zzz : datajmpl 
13'b0111101z1110z : datajmpl 
13'b01 1 1 101z1 1111 : datajmpl 
13'b01 11 1011 Ozzzz : datajmpl 
13'b01111011110zz : datajmpl 
13*b01 1 11011 11110 : datajmpl 
13'b01 1 1 1 100000zz : datajmpl 
13'b011111000010z : datajmpl 

13'bOIIIIIOOOzHz : datajmpl 
l^bOnmOOzlOzz : datajmpl 
13'b01111100z110z : datajmpl 



10'b01 11010000; 
10'b01 11010000; 
1O'b01 11010000; 

1O'b01 11010001 
10'b0111010001 
10'b01 11010001 
10'b0111010001 
■ 10'b01 11010001 
= 10'b01 11010001 



= 10'b0111010010; 

10'b0111010010; 
■ 10'b01 11010010; 
= 10'b0111010010; 

10'b0111010010; 

10'b0111010010; 

10'b01 11010010; 



10'b0111010011 
lO'bOmOIOOH 
10'b01 11010011 
10'b0111010011 
= 10'b0111010011 



10'b0111010100; 
= 10'b0111010100; 

10'b0111010100; 

1O'b0111O101OO; 

1O'b011101O1OO; 

10'b0111010100; 
= 10'b0111010100; 

= 10'b0111010101; 
■■ 10'b0111010101; 
10'b0111010101; 
= 10'b0111010101; 

= ICbOIHOIOHO; 
= 10'b01 110101 10; 
■ 10'b0111010110; 
■■ 10'b01 110101 10; 

10'b0111010110; 
= 10'b0111010110; 

10'b0111010110; 
= 10'b0111010110; 
= 10'b01 110101 10; 

10'b01 110101 10; 
= 10'b01 110101 10; 
= 10'b0111010110; 
■■ 10'b0111010110; 
= 10'b0111010110; 

= 10*b01 110101 11 
= 10'b01 110101 11 
= 10'b0111010111 
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13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 

13'b0111 
13'b0111 
13'b01 1 1 
13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 



10z10zzz : 
10z1111z : 
1010zzzz : 
101110zz : 
1011110Z 
11000zzz : 
110010zz : 
11001100 

110011z1 
110z1110 
11z10zzz : 
11z110zz : 
11z1110z : 
11z11111 
1110zzzz : 
11111110 



13'b100000000zzzz : 
13'b10000000100zz : 

13'b100000001z1zz : 
13'b1000000z110zz : 
13'b1 000000 10zzzz : 
13"b1 0000001 10zzz : 
13'b1 0000001 111zz : 
13'b1 00000 lOOzzzz : 
13*b1000001010zzz : 
13'b1 000001 01 10zz 
13'b100000101110z 

13'b1000001z1111z 
13*b1 000001 10zzzz : 
1 3'b 1000001 11 Ozzz : 
13'b10000011110zz 
13'b100000111110z 
1 3'b 1 0000 100zzzzz : 
13'b1 00001 01 OOzzz : 

1 3'b 1 00001 01z1zzz : 
13'b1 0000 1011 Ozzz : 
13'b10000110zzzzz: 
1 3'b 100001 11 Ozzzz : 
13'b10000111100zz 

T3'b1 00001 111z1zz : 
13'b10000111110zz 
1 3'b 1 0001 OOzzzzzz : 
13'b10001 01000000 



13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b10001 
13'b10001 



010000Z1 
01000z10 
0100z10z 
0100z111 
010z10zz 
010z1110 
01z10zzz 



data_ 
data_ 
data J 
data_ 
data" 
dataj 
data" 
data" 

data, 
data' 
dataj 
data_ 
data" 
data" 
dataj 
data, 
dataj 
data - 



tmp1 : 

tmp1 

tmp1 : 

tinpl 

jmp1 

tmp1 

_tmp1 

_tmp1 

_tmp1 

Jmp1 

tmp1 : 

tmp1 

_tmp1 

_tmp1 

tmp1 : 

_tmp1 

tmp1 : 

_tmp1 



data 
data' 
data^ 
data 
: data 
data^ 
data" 
: data 
: data 



_tmp1 
Vnp1 
tmpl 
tmp1 
_tmp1 
tmpl 
_tmp1 
_tmp1 
i_tmp1 



data_ 
data I 
data_ 
data" 
data, 
dataj 
data 



tmpl 

tmpl 

^tmpl 

.tmpl 

_tmp1 

tmpl ■ 

.tmpl 



data_tmpt = 
data_tmp1 
data_tmp1 : 
data_tmp1 = 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 - 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



136 

0'b0111010111; 
0'b0111010111; 
0'b0111010111; 
0'b0111010111; 
0'b0111010111; 
0'b0111010111; 
O'b0111010111; 
0'b0111010111; 

0'b0111011000; 
0'b0111011000; 
O'b0111011000; 
O'bOl 1101 1000; 
O'bOl 1101 1000; 
O'b0111011000; 
O'bOl 11 01 1000; 
O'bOl 1101 1000; 
O'bOl 1101 1000; 
O'bOl 1101 1000; 



O'bOl 1 
O'bOl 1 
O'bOl 1 
O'bOl 1 
O'bOl 1 
O'bOl 1 
O'bOl 1 
O'bOl 1 
O'bOl 1 



1011001; 
1011001; 
1011001; 
1011001; 
1011001; 
1011001; 
1011001; 
1011001; 
1011001; 



0'b0111011010; 

0'b0111011010; 

0'b0111011010; 

0'b0111011010; 

0'b0111011010; 

0'b0111011010; 

0'b0111011010; 

0'b0111011011; 
0'b0111011011; 
0'b0111011011; 
0'b0111011011; 
0'b0111011011; 

0*b0111011100; 
O'bOl 11 01 11 00; 
O'bOl 11 01 11 00; 
O'bOl 1101 1100; 

O'bOl 11 01 11 01; 
0'b0111011101; 
O'bOl 1101 1 101; 
0'b0111011101; 
O'bOl 1101 1101; 
O'bOl 1101 1101; 
0'b0111011101; 
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13'b1000101z1110z 
13'b1000101z11111 
13'b100010110zzzz 
13'b10001011110zz 
13'b1000101111110 
13'b1000110000zzz : 
13'b10001100010zz 
13'b100011000110z 
13'b1000110001110 

13'b10001100z1111 
13'b1000110z10zzz : 
13'b1000110z110zz : 
13'b1000110z1110z : 
13'b1000110z11110 
1 3'b 100011 01 Ozzzz : 
13'b1000110111111 
13'b100011100zzzz 
13'b1000111010zzz : 
13'b10001110110zz : 
13'b100011101110z 
13'b1000111011110 

13'b1000111z11111 : 
1 3'b 100011 11 Ozzzz : 
13'b1000111110zzz : 
13'b10001111110zz : 
13'blOOOIIIIIHOz 
13^1000111111110 
13'b10010000zzzzz : 
13*b 100 10001 Ozzzz : 
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: data_tmp1 
: data_tmp1 
data_tmp1 : 
: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data^tmpl : 
data_tmp1 
data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 
data_tmp1 ■ 
data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



data 
data, 
data] 
data 
data 
: data 
data 
data 



_tmp1 
tmp1 ■ 
tmp1 
_tmp1 
_tmp1 

/tmp1 
tmp1 = 
tmp1 ; 



13'b100100z11zzzz : data_tmp1 = 
13'b10010010zzzzz : data_tmp1 = 
1 3'b 100 100 11 Ozzzz : data_tmp1 = 
13'b100101000000z : data_tmp1 
13'b1001010000010 : data_tmp1 

13'b1001010000z11 : data_tmp1 
13'b100101000z10z : data_tmp1 
13'b100101000z110 : data_tmp1 
13'b10010100z10zz : data_tmp1 
13'b10010100z1111 : data_tmp1 
13'b1001010z10zzz : data_tmp1 
13*b1001010z1110z : data_tmp1 
13'b1001010z11110 : data_tmp1 
13"b 100 101 01 Ozzzz : data_tmp1 ■ 
13'b10010101110zz : data_tmp1 
13^1001010111111 :data_tmp1 
13'b100101100zzzz : data_tmp1 
13'b10010110100zz : data_tmp1 
13'blOOIOIIOIOIOz : data_tmp1 
13'b1001011010110 : data_tmp1 

13'b100101101z111 : data_tmp1 
13'b1001011z110zz : data_tmp1 



137 

0'b0111011101 
0'b0111011101 
0'b0111011101 
0'b0111011101 
O'bOl 1101 1101 
O'bOl 1101 1101 
0'b0111011101 
O'bOl 1101 1101 
O'bOl 1101 1101 



O'bOl 1101 11 10; 
0'b0111011110; 
0'b0111011110; 
O'bOl 1101 11 10; 
O'bOl 1101 11 10; 
0'b0111011110; 
O'bOl 1101 11 10; 
0'b0111011110; 
O'bOl 1101 11 10; 
O'bOl 11 01 11 10; 
O'bOl 1101 11 10; 
O'bOl 1101 11 10; 

0'b0111011111; 
O'bOl 11011111; 
0'b0111011111; 
O'bOl 11011 111; 
0'b011 1011 111; 
0*50111011111; 
0'b0111011111; 
O'bOl 11011 111; 



O'bOl 11 100000 
O'bOl 11 100000 
O'bOl 11 100000 
O'bOl 11 100000 
O'bOl 11 100000 

O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 

o'boi mooooi 

O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 
O'bOl 11 100001 

O'bOl 11 100010; 
O'bOl 11 100010; 
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13'b1001011z1110z : data_tmp1 
13'b1001011z11110 : data_tmp1 
13'b1 001 011 107777 : data_tmp1 
13'b1001011110zzz : data_tmp1 
5 13^1001011111111 : datajmpl 
13'b10011000zzzzz : data_tmp1 
13'b1001100100zzz : data_tmp1 
13'b10011001010zz : data_tmp1 
13'b1001 100101 100 : data_tmp1 

10 

13'b1001 100101 1z1 : datajmpl 
13'b10011001z1110 : data_tmp1 
13"b100110z110zzz : data_tmp1 
13'b100110z1110zz : data_tmp1 

15 13'b100110z11110z : data_tmp1 
1 3'b1 0011 0z1 11111 :data_tmp1 
1 3*b 10011 01 Ozzzzz : datajmpl 
13'b100110110zzzz : data_tmp1 
13^1001101111110 : data_tmp1 

20 13'b10011100000zz : data_tmp1 

13'b100111000z1zz : data_tmp1 
13'b10011100z10zz : data_tmp1 
13'b1001110z10zzz : data_tmp1 

25 1 3'b1 001 1 1 0z1 1 1 zz : datajmpl 
13'b100111010zzzz : data_tmp1 
13'b10011101110zz : data_tmp1 
13'b100111100zzzz : data_tmp1 
13'b1001111010zzz : data_tmp1 

30 13'b10011110110zz : data_tmp1 
13'b1001111011100 : data_tmp1 

13'b10011110111z1 :data_tmp1 
13*b1 001 111z1 11 10 : datajmpl 

35 13'b1 001111 10zzzz : datajmpl 
13'b1001111110zzz : datajmpl 
13'b10011111110zz : datajmpl 
13'b1 00111 11 11 1 0z : datajmpl 
13^1001111111111 : datajmpl 

40 1 3'b 1 0 1 0OOOOzzzzz : data Jmp 1 
13*b1 01 00001 Ozzzz : datajmpl 
1 3'b 101 00001 100zz : datajmpl 
1 3'b 101 000011 01 Oz : datajmpl 
13^1010000110110 : datajmpl 

45 

13'b101000011z111 : datajmpl 
1 3'b 1 0 1 0OOz 1 1 1 0zz : data Jmp 1 
• 13'b101000z1.1110z : datajmpl 
13'b101000z111110 : datajmpl 

50 1 3'b 1 0 1 000 1 0zzzzz : data Jmp 1 
1 3'b 101 000 11 Ozzzz : datajmpl 
13'b1010001110zzz : datajmpl 
13^1010001111111 : datajmpl 
13'b101001000zzzz : datajmpl 

55 13'b101001001000z : datajmpl 
13"b1 01001 0010010 : datajmpl 



138 

lO'bOHHOOOlO; 
10'b01 11 100010; 
10*b0111100010; 
lO'bOHHOOOlO; 
10"b01 11 100010; 
10'b01 11 100010; 
10'b01 11 100010; 
10'b0111100010; 
10'b0111100010; 

10'b0111100011; 
10'b01 11 100011; 
1O'b01 11 100011; 
1O'b01 11 100011; 
1O'b01 11 100011; 
10'b01 11 100011; 
1O'b01111OOO11; 
10'b01 11 100011; 
10'b01 11 100011; 
1O'b01 11 100011; 

10'b01 11 100100; 
10'b0111100100; 
10'b01 11 100100; 
10'b01 11 100100; 
10'b01 11 100100; 
10'b0111100100; 
1O'b01111001OO; 
10'b0111100100; 
10'b0111100100; 
10'b0111100100; 

10'b0111100101; 
1O'b011110O1O1; 
10'b0111100101; 
10'b0111100101; 
1O'b01111OO1O1; 
10'b0111100101; 
1O'b011110O1O1; 
10'b0111100101; 
10'b0111100101; 
10'b0111100101; 
10'b0111100101; 
10'b01 11 100101; 

1O'b011110O11O; 
1O'b011110O11O; 
10'b0111 100110; 
10'b0111100110; 
10'b0111100110; 
lO'bOHHOOHO; 
10'b0111100110; 
= lO'bOHHOOHO; 
10'b0111100110; 
~10'b0111100110; 
= 10'b0111100110; 
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13'b1010010010z11 

13'b101001001z10z 

13'b101001001z110 

13'b1010010z110zz 

13'b1010010z11111 

13'b101001z10zzzz : 

13'b1010010110zzz 

13'b101001011110z 

13'b1010010111110 

13"b10100110zzzzz : 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 : 



13'b101001111zzzz : data_tmp1 
13'b1010100zzzzzz : data_tmp1 
13'b101010100zzzz : data_tmp1 

13'b1010101z1zzzz : data_tmp1 
13'b101010110zzzz : data_tmp1 
13'b10101100zzzzz : data_tmp1 
13'b101011010zzzz : data_tmp1 



13'b101011z11zzzz : 
13'b10101110zzzzz : 
13'b101011110zzzz 
13'b101100000zzzz 
13'b101100001000z 
13'b1011000010010 : 

13'b1011000010z11 : 
13'b101100001z10z : 
13'b101100001z110 : 
13'b1011000z110zz : 
13'b1011000z11111 : 
13'b101100z10zzzz : 
1 3'b1 01 10001 10zzz : 
13*b101100011110z : 
13'b1011000111110 
13'b10110010zzzzz : 
13'b10110011100zz : 
13'b101100111010z 
13'b1011001110110 

13'b101100111z111 
13'b10110011110zz : 
13^101100111110^ 
13^1011001111110 
13'blOHOIOzzzzzz : 
13'b101101100zzzz : 
13'b101101t0l0zzz : 
13'b10110110il0zz 
13'b101101101110z 



data_tmp1 = 
data_tmp1 = 
data_tmp1 : 
data_tmp1 : 
: data_tmp1 
: data_tmp1 



data, 
data] 
data' 
data] 
data" 
dataj 
data, 
data] 
: data 
data_ 
data 
: data 
: data 

: data 
data 
: data 
: data 
data_ 
data, 
data] 
: data] 
: data 



_tmp1 
]tmp1 : 
]tmp1 
]tmp1 = 
_tmp1 
tmp1 = 
_tmp1 = 
_tmp1 
_tmp1 
tmp1 = 
]tmp1 
_tmp1 
_tmp1 

tmp1 
tmp1 
tmp1 
_tmp1 
tmp1 = 
]tmp1 : 
]tmp1 
~tmp1 
_tmp1 



13'b1011011z1111z : data_tmp1 
13'b101101110zzzz : data_tmp1 
13'b1011011 110zzz : data_tmp1 
13*b10110111110zz : data_tmp l 
13'b101101111110z : data_tmp1 



: 10'b0111100111; 

10'b011 11001 11; 
= 10'b0111100111; 

lO'bOHHOOIH; 
= 10'b0111100111; 

10'b0111100111; 

10'b011 11001 11; 
= 10'b011 11001 11; 
= 10^0111100111; 

10'b011 1100111; 

10'b01 11 101000; 
10'b01 11 101000; 
10'b0111101000; 



10'b0111101001 
10'bO111101O01 
10'b0111101001 
10'b0111101001 

10'b01 11 101010; 
10'bO111101O1O 
10'b0111101010 
10'b0111101010 
= 10'b0111101010 
= 10'b0111101010 



: 10'b0111101011; 

10'b0111101011; 
■■ 10^0111101011; 

10'b0111101011; 
= 10'b0111101011; 

10'b0111101011; 

10'b01 1 1 10101 1; 
= 10"b01 1 1 101011; 
= 10'b01 1 1 10101 1; 

10'b0111101011; 
= 10'b0111101011; 
= 10'b011 1101011; 
= 10'b01 1 1 10101 1; 

= 10'b0111101100; 

■ 10'b0111101100; 

■ 10'bO1111O11OO; 
= 10'b0111101100; 

rcboimonoo; 

10'b0111101100; 
= 10"b01 11 101-100; 
= 10'b01 1 1 101 100; 
= lO'bOHHOHOO; 



10'bO1111O1101 
10'bO1111O11O1 
10'bO1111O1101 
10*b0111101101 
■ 10'b0111101101 
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13*b1011100zzzzzz : data_tmp1 = 
1 3'b 1 0 1 1 1 0 1 0OOOzz : data_tmp 1 
13*b101 1101 0001 Oz : data_tmp1 

5 13*b101110100z11z : data_tmp1 
13'b10111010z10zz : data_tmp1 = 
13'b10111010z110z : data_tmp1 
13'b1011101z10zzz : data_tmp1 = 
13'b1011101z1111z : data_tmp1 = 

10 13'b101110110zzzz : data_tmp1 = 
13'b10111011110zz : data_tmp1 •■ 
13'b101110111110z : data_tmp1 
13'b10111100zzzzz : data_tmp1 = 
13'b1011110100zzz : data_tmp1 = 

15 13'b10111101010zz : data_tmp1 
13'b101 11 10101 10z : data_tmp1 
13'b1011 110101 1 10 : data_tmp1 

13'b10111101z1111 :data_tmp1 
20 13'b101111z110zzz : data_tmp1 = 
13'b101111z1110zz : data_tmp1 • 
13'b101111z11110z : data_tmp1 
13'b101 1 1 1z1 11110 : data_tmp1 
1 3'b 1 0 1 1 1 1 1 0zzzzz : data_tmp 1 = 
25 13'b101111110zzzz : data_tmp1 = 
13^1011111111111 :data_tmp1 
13'bHOOOOOOOzzzz : data_tmp1 = 
1 3'b 11 000000 10zzz : data_tmp1 ■ 
13'b1 10000001 100z : data_tmp1 
30 13'b1 10000001 1010 : data_tmp1 

13'b1 10000001 1z11 : data_tmp1 
13'b1100000z1110z : data_tmp1 
13'b1100000z11110 : data_tmp1 

35 13'b1 10000z10zzzz : data_tmp1 = 
13'b110000z110zzz : data_tmp1 = 
13'b110000z1110zz : data_tmp1 = 
13'b110000z111111 :data_tmp1 
13'b11000010zzzzz : data_tmp1 = 

40 13'b1 1000011 11 10z : data_tmp1 
13'b1 100001 111 110 : data_tmp1 
1 3'b 1 10001 OOOOzzz : data_tmp1 
13'b1 100010001000 : data_tmp1 

45 13'b1 10001 0001 0z1 : data_tmp1 
13'b1100010001z10 : data_tmp1 
13*b11000100z110z : data_tmp1 
13'b110001O0z1111 : data_tmp1 
13'b1 10001 OzlOzzz : data_tmp1 ■• 

50 13'b1100010z110zz : data_tmp1 
13'b1100010z11110 : data_tmp1 
13'b110001z10zzzz : data_tmp1 = 
13'b1 1000101 1110z : data_tmp1 
13'b1 100010111 111 :data_tmp1 

55 1 3'b 1 1 000 1 1 0zzzzz : data_tmp 1 : 
1 3'b 1 1 000 1 1 1 1 0zzz : data_tmp 1 
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10'b0111101101; 
■■ 10'b0111101101; 
= 10'b0111101101; 



= 10'b0111101110 
10'b0111101110 
' 10'b0111101110 
10'b0111101110 
■■ 10^0111101110 
10'b0111101110 
' 10'b0111101110 
= 10'bO1111O111O 
10'bO1111O1110 
10'b0111101110 
= 10*1)0111101110 
■ 10'b0111101110 
- lO'bOHHOIHO 



= 10^0111101111; 

10^0111101111; 

10'b0111101111; 

10^0111101111; 
= 10'bO1111O1111; 

10^0111101111; 

10'bO11 1 101 111; 
= 10'b0111101111; 

10^0111101111; 

10^0111101111; 
= 10*b011 1101 111; 
■ 10'b01 1 1 101 111; 

= 10'bO11 11 10000; 
= 10'bO11 11 10000; 
= 10'b0111 110000; 

10"b011 11 10000; 

10'bO11 11 10000; 

10"b011 11 10000; 
= 10'b01 1 1 110000; 

10'bO11 11 10000; 
= 10'b011 11 10000; 
= 10'bO11 11 10000; 

10'b011 11 10000; 
= 10'bO11 1110000; 

= 10'b0111110001; 
= 10'b01 11 110001; 
: 10"bO11 11 10001; 
= 10'b011 1110001; 

10'bO11 11 10001; 

10'bO111 110001; 
= 10'b011 11 10001; 

10'b011 11 10001; 
= 10'bO11 1110001; 
= 10'bO1 11 110001; 

10'bO11111OO01; 

10'b011 11 10001; 
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13'b1100011111zzz 


data_ 


_tmp1 




10'b0111110010; 


13'b1100100zzzzzz : 


data" 


tmp1 




0^0111110010; 


13'b11001010zzzzz : 


data_ 


^tmpl 




I0'b0111 110010; 


13'b1100101100zzz 


data_ 


]tmp1 




10*50111110010; 


13'b110010110100z 


: data" 


Jmp1 


— 


10 f b01 111 10010; 


13'b1100101101z1z 


: data. 


Jmp1 


= 


10^0111110011; 


13'b11001011z110z 


data" 


~tmp1 




lO'bOHIHOOH; 


13'b1 100101 11 Ozzz 


data" 


_tmp1 


— 


10*50111110011; 


4 OIL <t <4 AAH 4 4 4 O — — 

13b1100101 1 110ZZ 


. data_ 


Jmpi 




•1 A'UAH 4 4 4 4 f\C\ 4 4 • 

10 b01 111 1001 1 , 


13'b110010111111z 


: data] 


_tmp1 


= 


10'b011 1110011; 


13'b1100110zzzzzz : 


data_ 


tmp1 




0'b0111 110011; 


13'b110011100zzzz : 


data_ 


]tmp1 


— 


101)0111110011; 


13'b1100111010zzz 


data_ 


_tmp1 


= 


10'b011 11 10011; 


13'b11001110110zz 


: data_ 


_tmp1 


- 


10'b01 111 10011; 


13'b1100111011100 


: data 


_tmp1 




10'b01 11 110011; 


13"b11001110111z1 


: data 


_tmp1 


= 


10'bO11111O1O0; 


13'b1100111z11110 


: data^ 


_tmp1 


= 


10'b011 1110100; 


13'b110011110zzzz : 


data^ 


tmp1 


= 


10'b0111110100; 


13'b1100111110zzz 


data" 


Jmp1 




10'b0111110100; 


13 b1 1001 111 110zz 


: data_ 


_tmp1 




4 AIL A<4 A A A A C\ A f\ . 

10 b01 111 10100; 


13'b110011111110z 


: data] 


_tmp1 




10'bO11111O1O0; 


13'b1100111111111 


: data" 


_tmp1 


= 


10'b0111110100; 


13'b1101000zzzzzz : 


dataj 


_tmp1 




I0'b0111 110100; 


13'b110100100zzzz : 


data_ 


]tmp1 


— 


10'b0111110100; 


13'b110100101000z 


: data" 


Jmp1 


— 


10'b01 11 110100; 


13'b1101001010010 


: data 


tmp1 


— 


10'bO11111O100; 


13'b1101001010z11 


: data. 


__tmp1 


— 


10"b01 1 1 110101 ; 


13'b110100101z10z 


: data] 


Jmp1 




10'bO1 1 1 1 10101 ; 


13'b110100101z110 


: data] 


_tmp1 




10'bO11111O101; 


13'b1101001z110zz 


data_ 


Jmp1 


- 


10'b011 11 10101; 


13'b1101001z11111 


: data] 


_tmp1 


= 


10'b01 11110101; 


/« oil H 4 f\ 4 r\C\ 4 4 

13 b1 101001 1 0zzzz 


data_ 


imp 1 




4 d 4 4 4 4 4 f~\ 4 C\ 4 . 

10 b01 11110101, 


13^110100111 Ozzz 


. data" 


Jmp1 


— 


10'b0111110101; 


13'b110100111110z 


: data] 


_tmp1 


— 


10'bO1 1 1 1101 01 ; 


13'b1101001111110 


: data 


_tmp1 


— 


10'b0111110101; 


13'b1101010zzzzzz : 


data_ 


.tmp1 




10'b0111 1 10101; 


13'b1101011000zzz 


: data_ 


Jmp1 




10'b0111110101; 


13'b110101100100z 


: data] 


Jmp1 




10'b0111110101; 


13'b1101011001z1z 


: data_ 


Jmp1 




10^0111110110; 


13'b1 10101 10z110z 


: data" 


_tmp1 




10^0111110110; 


lobiiuiunzi uzzz 


data_ 


tmp 1 




11) DU1 \\\ 1U1 1U, 


13'b1101011z110zz 


: data] 


Jmp1 




10'b011 11101 10; 


13'b1101011z1111z 


: data_ 


Jmp1 


= 


10'b01 1 1 1 101 10; 


13'b1 10101.1 10zzzz 


data_ 


Jmp1 




10'b01 111-10110; 


13'b11010111'1110z 


: data] 


Jmp1 


= 


10'b01 1 1 1 101 10; 


13'b1101100zzzzzz : 


data_ 


_tmp1 




I0"b01 1 1 1 101 10; 


13'b11011010000zz 


: data_ 


Jmp1 




10'b01 1 1 1 101 10; 


13'b110110100z1zz 


: data_ 


Jmp1 




10^0111110111; 


13'b11011010z10zz 


: data] 


Jmp1 




10^0111110111; 


13'b1 1011 01 z1 Ozzz 


: data_ 


_tmp1 




10'b0111 110111; 


13'bllOHOIzlllzz 


: data] 


~tmp1 




10'b01 1 1 1 101 1 1 ; 



9NSPOCID' <VJO ooiojirti? i „ 



WO 98/19410 



PCT/US97/18911 



13'b110110110zzzz : data_tmp1 = 
13'b11011011110zz : data_tmp1 • 
13'b1101110z77zzz : data_tmp1 = 

5 13'b1101111zzzzzz : data_tmp1 = 
1 3'b1 1 1 0OOOOzzzzz : data_tmp1 = 
13'b1 11 00001 Ozzzz : data_tmp1 = 
13'b11 100001 10zzz : data_tmp1 = 
13'b1 1100001 11 Ozz : data_tmp1 ' 
10 13'bl 1 100001 1 1 10z : data_tmp1 

IS'blHOOOzlllHz : datajmpl ■ 
13'b11100010zzzzz : data_tmp1 = 
13'b1 1100011 Ozzzz : data_tmp1 = 

15 1 3'b1 11 0001 1 1 0zzz : datajmpl = 
13'b1 1 10001 1 1 10zz : datajmpl ■■ 
13'b111000111110z : data_tmp1 
13'b11100100zzzzz : data_tmp1 = 
13'b111001010zzzz : data_tmp1 = 

20 1 3'b1 11 001 01 1 0zzz : datajmpl = 
13'b11100101110zz : data_tmp1 
13^1110010111 10z : data_tmp1 
13'b1 110010111 110 : data_tmp1 

25 13'b111001z111 111 : data_tmp1 
13'b11100110zzzzz : data_tmp1 = 
1 3'b 1 1 1 00 1 1 1 0zzzz : data Jmp 1 = 
13'b1110011110zzz : data_tmp1 : 
13'b11100111110zz : data_tmp1 

30 13'b11 10011 111 10z : data_tmp1 
13'b1 1 1001 1111110 : data_tmp1 
13'b1110100zzzzzz : data_tmp1 = 
13'b111010100000z : datajmpl 

35 13'b1110101000z1z : data_tmp1 
13'b111010100z10z : data_tmp1 
1 3'b1 11 01 010z1 Ozz : datajmpl 
13'b11101010z111z : data_tmp1 
13'b1110101z10zzz : data_tmp1 = 

40 13'b1110101z1110z : data_tmp1 
13'b111010110zzzz : data_tmp1 = 
13'b11 10101 1110zz : datajmpl 
13'b1 1101011 1111z : data_tmp1 
1 3'b1 11011 Ozzzzzz : datajmpl = 

45 13'b11101110000zz : data_tmp1 
13'b111011100010z : datajmpl 
13'b1110111000110 : datajmpl 

13'b111011100z111 : datajmpl 
50 13'b11101110z10zz : datajmpl 
13'b11101110z110z : datajmpl 
13'b1 1 101 1 10z1 110 : datajmpl 
1 3'b1 11 01 1 1z10zzz : datajmpl 
13^111011^11111 : datajmpl 
55 13'b1 1 101 1 1 10zzzz : datajmpl 
13'b1 11011 11 11 Ozz : datajmpl 
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10^0111110111; 
= 10'b0111110111; 
10'b0111110111; 

10'b01111 11000 
10'b01 1111 1000 
10'b01 111 11000 
10'b0111111000 
■■ 10'b0111111000 
= 10'b0111111000 

= 10'b0111111001 
10'b01 1111 1001 
10'b0111111001 
' 10'b01 1111 1001 
■■ 10'b0111111001 
= 10'b0111111001 
10'b01 111 11001 
10'b0111111001 

■■ icbonnnooi 

= 10'b01 111 11001 
= 10^0111111001 

= icbonnnooi 



■■ 10*60111111010; 

10^0111111010; 

10'b0111111010; 

10'b0111111010; 
= lO'bOHHHOlO; 

= icbonnnoio; 

= 10'b0111111010; 
10^0111111010; 
= 10'b0111111010; 

= 10^0111111011; 
= 10^0111111011; 
■ 10^0111111011; 

10^0111111011; 

10^0111111011; 
= 10'b0111111011; 

10^0111111011; 
: 10^0111111011; 
= 10^0111111011; 

10^0111111011; 
= 10^0111111011; 
= 10^0111111011; 
= 10^0111111011; 

= 10'b0111111100; 
= 10'b01 1111 1 100; 
= 10'b0111111100; 
= 10'b01 1111 1100; 

10'b0111111100; 
= 10^0111111100; 
= 10'b0111111100; 
= 10'b0111111100; 
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13'b111011111110z 
13'blllOIIIIIHIO 
13'b1111000zzzzzz : 
13'b1111001000zzz 
13'b11110010010zz 
13'b111100100110z 

13'b11110010z111z : 
13'b1111001z10zzz : 
13'b1111001z110zz : 
13'b1111001z1110z : 
13'b111100110zzzz : 
13'b111100111111z 
13'b1111010zzzzzz : 
13'b111101100zzzz : 
13'b1111011010zzz : 

13'b1111011z11zzz : 
13'b111101110zzzz : 
13'b1111011110zzz 
13'b1111100zzzzzz 
13'b11111010zzzzz 
13'b11111011000zz 

13'b111110110z1zz : 
13'b11111011z10zz : 
13'b11111z1110zzz : 
13'blllllzlllHzz : 
13'b1111110zzzzzz : 
13'b11111110zzzzz : 
13'b111111110zzzz : 
13'b11111111110zz 
default: data_tmp1 = 
endcase 



: data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 



data, 
data" 
data_ 
data. 
tiata_ 
data 
dataj 
data_ 
data" 



_tmp1 

tmp1 

_tmp1 

jmp1 

~tmp1 

Jmp1 

tmpl = 

_tmp1 

Vnp1 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 : 
: data_tmp1 
: data_tmp1 



data 
data 
data 
data 
data, 
data, 
data 
data 



tmpl 
tmpl 
jtmpl 
"tmpl 
tmpl 
tmpl 
_tmp1 
^tmp1 
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0'b0111111100; 
O'bOIHHHOO; 
O'b0111111100; 
O'bOl 111 11 100; 
CbOIHHHOO; 
O'b0111111100; 

O'b0111111101; 
O'bOl 1111 1101; 
0^0111111101; 
0'b0111111101; 
0^0111111101; 
O'bOl 1 11 11 101; 
O'b0111111101; 
0^0111111101; 
0'b0111111101; 

0'b0111111110; 
O'bOl 111111 10; 
O'bOl 11111110; 
O'bOl 11111110; 
0^0111111110; 
0'b0111111110; 



O'b011111 1111 
O'bOl 11111111 
O'bOl 11111111 
0'b0111111111 
0^0111111111 
O'bOl 11111111 
O'bOl 11 11 11 11 
O'bOl 11111111 



10'bxxxxxxxxxx; 



always @(posedge elk) 
if (enable_3) 

data_tmp2 <= data_tmp1; 
assign out_data = data_tmp2; 
endmodule 



Listing 14 



// Sccsld: %W% %G% 

....v....*....**.*****.*.****.*.*.. 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

Description: Verilog code for windowing algorithm to enable detection of the 
"active interval" of the COFDM symbol for guard values of: 
64, 128, 256, 512 and an active interval of 2048. (RTL) 

Notes : This module generates the window signal for the FFT in the form 



BNSDOCID' <WO _ 9Sl?J'Oa2 • > 



WO 98/19410 PGT/US97/18911 

144 



of valicMn and provides the necessary signals for the l/Q 
demodulator, sync interpolator and error handler. 

To DO: Check between successive symbol acquires for consistency 
5 in timing. 

Window timing pulse 
tracking mode, filter peaks 
IQ and sync interpolator guard pulses. 
Override functions for timing. 
10 Gain confidence by comparing symbol_acq vs retrys 



/ 



'timescale 1ns / 100ps 

15 

module fft_window (in_xr, 
in_xi, 
elk, 
nrst, 

20 validjn, 

valid_out, 

in_resync, 
out_iqgi, 

out_sincgi, 
25 out_rx_guard, 

out_acquired, 

out_fft_window, 

enable_3_4, 

ouMest, 

30 track_ram_address, 

xri_tmp1, 

xri_tmp5, 

track_ram_rnotw, 

track_ram_enable, 
35 ram_addr, 

ram_enable, 

ram_rnotw, 

ram10_in, 

ram10_out, 

40 x1r_10, //To FFT datapath (I). 

x1 i_1 0, // To FFT datapath (Q). 

z2r_10, // From FFT datapath (I) 

z2i_10, // From FFT datapath (Q) 

fft_ram_rnotw, // From FFT addr gen. 

45 . fft_ram_enable, . // From FFT addr gen. 

fft_ram_addr); ■ // From FFT addr gen. 



50 



// — 
// 

// — 



Parameter definitions. 



55 



parameter wordlength =12; // Data wordlength. 

parameter r_wordlength =10; // ROM data wordlength. 

parameter AddressSize =13; // Size of address bus. 

parameter FIFO__L = 256; // Tracking FIFO length, 

parameter FIFOJ__bits = 8; // Track FIFO addr bits 



10 
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parameter FIFO_N = 64; // Acc length S(i-j). 

parameter FIFO_n = 64; // Acc length S(i-n-j). 

parameter FIFO_A = 32; // t_offset dly FIFO+1 . 

parameter FIFO_A_bits = 5; // Track FIFO bits, 

parameter lu_AddressSize =15; // log lu address size, 

parameter delta = 20; // Gu threshold distance 

parameter acquired_symbols = 2; // Acq symbls before trk 

parameter pos_threshold = 3; // For info only, 

parameter t_offset_threshold = 10; // t_offset valid thresh 

parameter w_advance = 10; //win trig frm boundary 

parameter sincintjatency = 2; // Latency to sine intep 

parameter iqdemodjatency = 168; // Latency to IQ demod. 

parameter start = 3'bOOO, // Search for neg peak, 
peakl = 3'b001 , // 1 st pos peak found. 
peak2 = 3'b010, // 2nd pos peak found. 
peak3 = 3'b01 1 , // 3rd pos peak found, 
trackl = 3'b100, // Tracking model. 
track2 = 3'b101; // Tracking model. 

// 

// Input/Output ports. 

// 

input elk, // Master clock. 

nrst, // Power-up reset. 

valid_in, // Input data valid. 
in_resync, // Sync FSM into Acqure. 
fft_ram_rnotw, 
fft_ram_enable; 

input [AddressSize-1:0] fft_ram_addr; 

input [wordlength-3:0] in_xr, // FFT input data, I. 
in_xi, // FFT input data, Q. 
xri_tmp5; // Track RAM output. 

input [wordlength*2-1:0] ram10_out; // From 1K x 24 bit RAM. 

input [wordlength-1:0] z2r_10, z2i_10; // From FFT datapath. 

output [wordlength*2-1 :0] ram10_in; // To 1K x 24 bit RAM. 

output [wordlength-3:0] xri_tmp1; // Track RAM input. 

output [14:0] out_test; //Temp testpin output. 

output outjqgi, // l/Q demod guard info. * 
out_sincgi, // Sine int. guard info. 
out_acquired, // Symbol acquired flag. 
out_fft_window, // FFT processor st/stp 
enable_3_4, 

valid_out, 

track_/am_rnotw ( 

track_ram_enable, 

ram_enable, 
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ram_rnotw; 



output [FIFO_L_bits-1 :0] track_ram_address; // Tracking ram address 
5 output [1:0] out_rx_guard; // Acquired gu length, 
output [AddressSize-1:0] ram_addr; 

output [wordlength-1:0] x1r_10, x1M0; //To FFT datapath. 

10 

// 

// Wire/register declarations. 

// ; 



15 reg out_acquired, // Symbol acquired flag. 

out_fft_window, // FFT window signal. 

tracking, // Tracking mode data. 

acc_add, // Acc add only flag. 

acc_add_sub, // Acc add/sub flag. 
20 fifo_a_add_sub, // FIFO_A add/sub flag. 

f_ratio_valid, // F ratio is valid 

read, // Track FIFO read flag. 

write, // Track FIFO write flag 

track_mode, // Track/Acq status flag 
25 dpctl_reset, // Datapath control rst. 

t_reset, // Timing counter reset. 

g_a_reset, // Guard_active cnt rst. 

guard_valid, // Guard signal is valid 
t_retime_acq, // Retime timing counter 
30 t_retime_trk, // Retiming for tracking 

t_offset_valid, // Peak offset valid. 

t_offset_avg_valid, // Average offset valid. 

pulse, // Pulse on states 4 & 5 

enabie_fft, // FFT enabled flag. 
35 out_sincgi, // Guard int to sincint. 

out_iqgi, // Guard int to iq demod 

ram_enable, 

rarrwnotw; 

40 reg [14:0] guard_active; // Guard+active length, 
reg [3:0] retry, // No failed retry's. 

acq_symbols; // No of acquired symbls 
reg [wordlength-2:0] xri_tmp7; // Delayed difference, 
reg [wordlength-3:0] xr_reg, // (10 bits) 
45 xi_reg, 

xri_tmp1, // Sum of |lj + |Q|. • 
xrijtmp3, //Delayed i difference | . 
* xri_tmp6; // FIFO 2K/L output. 

50 reg [FIFO_L_bits-1:0] read_address, // Track FIFO read addr. 
write_address, // Track FIFO write adr. 
track_ram_address; // Tracking ram address; 



reg [lu_AddressSize-1:0] acc; // Holds input variance. 

55 reg [wordlength-4:0] xr_tmp1, f/ \\\. 
xi_tmp1; // f Q | . 



20 
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reg [2:0] r; // Clock decode counter, 

reg [1:0] out_rx_guard; // Determined guard, 
reg [r_wordlength:0] f_ratio; // Statistical F ratio, 
reg [10:0] fft_valid_count; // Counts no of FFT vlds 
5 reg [AddressSize-1:0] window_ram_addr, // ram_address counter. 
ram_addr; 

reg [14:0] t_count, // Window timing count. 

t_offset; // Peak offset from t_ct 
reg [14:0] g_a_couot; // Guard_active counter. 
10 reg [14:0] dp_count; // Datapath timing count 
reg [14:0] t_offset_avg; // Averaged offset, 
reg [2:0] state, // Acq/Track FSM state. 

old_state; // Old tracking state, 
reg [9:0] guardjength; // Thresholded guard len 

15 

reg [FIFO_A_bits:0] fifo_a_count; // Count till fifo_a ful 
// 1 bit more -> retime 

reg [r__wordiength-1:0] max_peak; // Maximum positive peak 

reg [wordiength-1:0] msb_outJmp, // Temporary stores for 

lsbjn_tmp; // even symbols to RAM. 
wire [AddressSize-1:0] fft_ram_addr; // From FFT RAM addr gen 

25 wire elk, // Master clock. 

nrst, // Power-up reset. 

enable_0_4, // Clock enable 0 in 4. 
enabie_1_4, // Clock enable 1 in 4. 
enable_2_4, // Clock enable 2 in 4. 
30 enable__3_4, // Clock enable 3 in 4. 

enable_0_8, // Clock enable 0 in 8. 
enable_1_8, // Clock enable 1 in 8. 
enable_2_8, // Clock enable 2 in 8. 
enable_3_8, // Clock enable 3 in 8. 
35 enable_4__8, // Clock enable 4 in 8. 

enable_5_8, // Clock enable 5 in 8. 
enable_6_8, // Clock enable 6 in 8. 
enable_7_8, // Clock enable 7 in 8. 
ram_enable_8, // Acq FIFO enable. 
40 track_ram_enable, // Tracking RAM enable 

track_ram_rnotw, //Tracking RAM rnotw. 
even_symbol, // valid on even symbols 
in_resync, // Resync to acqn mode. 
pos_peak, // +ve peak, ref only! 
45 dp_control, // Datapath acq/trk ctl. 

t_offset_ctl, //Trk averager dp ctl. 
fft_ram__rnotw, 
fft_ram_enable; 
wire [lu_AddressSize-1:0] lu_address; 
50 wire [r_wordlength-1:0] lu_data, 
xri_tmp9; 
wire [wordlength-3:0] xri_tmp2, 
xri_tmp4, 
xrLtmpS, 

55 in_q, 

out_q; 
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wire [wordlength-1:0] ram_in; 

reg [wordlength-1:0] lsb_out, 
msb_out; 

5 

reg [wordlength-1:0] ram_out ( 
msbjn, 
Isbjn; 

10 wire [wordlength*2-1:0] ram10_out; 
reg [wordlength*2-1:0] ramlOJn; 



15 



reg [wordlength-1:0] x1r_10, x1i_10; 
wire [wordlength-1:0] z2r_10, z2M0; 



wire [14:0] out Jest; 

wire [14:0] t_offset_diff, // Actual +/- difference 
t_offsetJhresh, //Valid offset (maybe) 
t_offset_dly, // Delayed of above. 
20 t_offset_scalled, // Scalled to t_offset. 

read_pos, // read trig, +ve offset 
read_neg, // read trig, -ve offset 
write_pos, // write trg, +ve offset 
write_neg; // write trg, -ve offset 

25 

assign outjest = t__offset_diff; 

// 

// Fast 40 MHz clock decoder and validjn control. 

// . 

30 

always @(posedge elk) 

if (!nrst) // Synchronous power-up reset. 

r<=0; 

else if (validjn) // Count if input data valid. 

35 r <= r + Vb1; 

assign enable J)_4 = validjn & (-r[1) & -r[0]); // Gate valid_in with 
assign enable_1_4 = validjn & (~r[1] & r[0]); // decoded enable signals 
assign enable_2_4 = validjn & ( r[1] & ~r[0]); // to control all reg's. 
40 assign enable_3_4 = validjn & ( r[1] & r[0]); // Enables every 4 elk's 

assign enable_1_8 = validjn & (-r[2] & -r[1] & r[0]); 
assign enable_2_8 = validjn & (~r[2] & r[1] & -r[0]); 
assign enable_3_8 = validjn & (-r[2] & r[1] & r[0]); 
45 assign enable_4_8 = validjn & ( r[2] & ~r[1] & V[0]); // Enables every 8 
assign enable_5_8= validjn & ( r[2] & -r[1] & r[0]); // elk's 
assign enable 6_8 = validjn & ( r[2] & r[1] & -r[0]); 
assign enable^7_8 = validjn & ( r[2] & r[1] & r[0]); 



50 // 



// The entire data path incorporating the FIFO's, ROM and comparators. 

// 

// Register the data inputs to the windowing module. 
55 always @(posedge elk) 
if (in_resync '. ; !nrst) 
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begin 

xrjreg <= in_xr; 

xi_reg <= in_xi; 
end 

5 else if (enable_3_4) 
begin 

xr_reg <= in_xr; 

xi_reg <= in_xi; 
end 

10 

//Take the modulus of in_xr and in_xi and add together (|in_xr| + |in_xi|). 
always @(xr_reg or xi_reg) 
begin 

if (xr_reg[wordlength-3]) // Checking MSB for negative number. 
15 xr_tmp1 = -xr_reg; 

else 

xr_tmp1 = xr_reg; 

if (xi_reg[wordlength-3]) // Checking MSB for negative number. 
20 xi_tmp1 = -xi_reg; 

else 

xi_tmp1 = xi_reg; 

xri_tmp1 = xr_tmp1 + xi_tmp1; 
25 end 

assign even_symbol = r[2]; . . . 

always @(even_symbol or msb_out_tmp or ram_in or lsb__out) // Mux MSB/LSB to 
30 if (even_symbol) // allow 1 K RAM 

begin // to act as a 2K 

ram_put = lsb_out; // FIFO, possible 

lsb_in_tmp = ram_in; // since data 

end // bitwidth is 2b 

35 else // bits wide in 

begin // the 1K RAM and 

ram_out - msb_out_tmp; // only b bits are 

msbjn = ramjn; // required in the 

end // data path. 

40 

always @(posedge elk) // Delay even 

begin // symbols by one 

if (enable_5_8) // symbol so that 

lsb_in <= lsb_in_tmp; // two symbols are 

45 . if (enable_7_8) // written & read 

msb_out_tmp <= msb_out; // to the ram. 

end 

assign xri_tmp2 = ram_out; // Map RAM I/O 

50 assign ram_in = xri_tmp1 ; // to dp wires. 

always @(ram10_out or msbjn or lsb_in or z2r_10 or z2i_10 
or ram_enable_8 or enable_3_8 
or fft_ram_enable or fft_ram_rnotw 
55 or window__ram_addr or fft_ram_addr 

or tracking) // FFT/WINDOW FIFO 
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begin // RAM Mux code, 

if (Itracking) // In window acq 

begin // mode. 

msb_out = ram10_out[2*wordlength-1:wordlength]; 
5 lsb_out = rami 0_out[wordlength-1 :0]; // Connect window 

ram10_in[2*wordlength-1 :wordlength] = msbjn; // datapath & RAM 
ram10_in[wordlength-1 :0] = lsb_in; // control signals 
ram_enable = ram_enable_8; 
ranwnotw = enable_3_JJ; 
10 ram_addr = window_ram_addr; 

end 

else // In tracking 

begin // mode, therefore 

xlrJO = ram10_out[2*wordlength-1:wordlength]; // FFT functional. 
15 x1i_10 = ram10_out[wordlength-1:0]; 

ram10_in[2*wordlength-1:wordlength] = z2r_10; // Connect FFT 

ram10_in[wordlength-1 :0] = z2M0; // datapath & RAM 

ram_enable = fft_ram_enable; // control signals 

ram_rnotw = fft_ram_rnotw; 
20 ram_addr = fft_ram_addr; 

end 
end 



25 



assign track_ram_rnotw = enable_3_4 & read; 

assign track_ram_enable = (enable_3_4 & read) 1 1 (enable_1_4 & write); 



// Select which FIFO we read data from depending on tracking or acquire mode, 
always @(xri_tmp5 or xri_tmp2 or tracking) 
if(tracking) 

30 xri_tmp6 = xri_tmp5; // Tracking mode 

else // data. 

xri_tmp6 = xri_tmp2; // Acquisition 

// mode data. 
// Perform computation of s(i-j) 
35 always @(xri_tmp1 or xri_tmp6) 
xri_tmp7 = xri_tmp1 - xri_tmp6; 

// Take the modulus of xri_tmp7; 
always @(xri_tmp7) 
40 if (xri_tmp7[wordlength-2]) // Check MSB for 

xri_tmp3 = -xri_tmp7; // neg number, 

else 

xri_tmp3 = xri_tmp7; 

45 // Setup FIFO to perform moving summation of s(i-j) values. 

fft_sr_addr#(wordlength-2, FIFOJM) sr_N (elk, dp_control, // Length=FfFO_N. 
xri_tmp3, // Input. 
*xrLtmp4); //Output. 

50 // Compute the moving summation i.e S(i-j) = s(i-1j-1) + s(i-2J-2) + ... 

// We must NOT truncate or round acc as the error will grow across a symbol, 
always @(posedge elk) 

if (in_resync j ; !nrst 1 1 dpctl_reset) // Clear accumulator at 
acc <= 0; // power-up or Resync or trk. 

55 else if (dp_control & acc_add) // Wait until acc data valid. 
// Subtract as well as add when 2K/8K FIFO is full. 
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acc <= acc + xri_tmp3 - ((acc_add_sub) ? xri_tmp4 : 0); 



assign Iu_address = acc; // Ensure lu_address is large enough to 
// accomodate acc number range. 

5 

fft_windowJu #(r_wordlength, lu_AddressSize) // Case table instance 
logju (elk, dp_control t lu_address, lu_data); //for a log lookup. 

// Setup 5 bit FIFO to determine the delayed variance. 
10 fft_sr_addr #(r_word length, FIFO_n) sr_n (elk, dp_control, // Length=FIFO_n. 

Iu_data, // Input. 
xri_tmp9); // Output. 

// Determine difference of logs and hence the f_ratio when it is valid. 
1 5 always @(lu_data or xri_tmp9 or f_ratio_valid) 

f_ratio = (f_ratio_valid) ? Iu_data - xri_tmp9 : 1'b0; 

// Positive threshold (for information only) 
20 // 

assign pos_peak =((f_ratio >= pos_threshold && 
f_ratio < (1 « r_wordlength)) ? 1'b1 : 1*b0); 

25 // 

// FFT window datapath control registers. 

// 

always @(posedge elk) 
30 if (in_resync ! !nrst 1 1 dpctl_reset) // Synchronous reset, 
begin 

fjatio_valid <= 1'b0; // Initalise datapath 

acc_add <= 1'b0; //control registers. 

acc_add_sub <= 1'b0; 
35 end 

else if (enable_3_4 && -read) // Acquisition mode 

begin // Use 2K/8K FIFO. 

if (dp_count == 2047 + FIFO_N + FIFO_n + 1 + 1) // f_ratio only valid 

f_ratio_valid <= Vb1; // after sum of FIFO 

40 if (dp_count == 2047) // +acc+ROM latencys 

acc_add <= 1 'b1 ; // Add if acc full. 

if (dp^count == 2047+FIFO_N) // Add/sub when FIFO 

acc_add_sub <= 1'b1; // N is full, 

end 

45 else if (enable_3_4 && read) // Tracking mode 

begin . // Use FIFO_L 

if (dp__count == FIFO_L + FIFO_N + FIFO_n + 1 + 1) // f_ratio only valid 
f_ratio_valid <= 1'b1 ; // after sum of FIFO 

if (dp_count == FIFO_L) // +acc+ROM latencys 

50 acc_add <= 1'b1; // Add if acc full. 

if (dp_count == FIFO_L + FIFO_N) // Add/sub when FIFO 
acc_add_sub <= 1'b1 ; // N is full, 

end 

55 always @(posedge elk) 

if (in_resync ' i Inrst) // Synchronous reset. 
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fifo_a_add_sub <= 0; 

else if (enable_3_4 && fifo_a_count == FIFO_A) // fifo_a is full 
fifo_a_add_sub <= 1; // so add and sub. 

always @(posedge elk) 

if (in_resync 1 1 Inrst) // Synchronous reset. 

t_offset_avg_valid <= rbO; // Average value is 

else if (enable_3_4 && fifo_a_count == FIFO_A + 1) // valid one cycle 

t_offset_avg_valid <= 1'b1 ; // after add_sub sig. 

assign dp_control = enable_3__4 && // Datapath enable 

(~track_mode 1 1 track_mode && read); // in acq/track mode. 



assign t_offset_ctl = enable_3_4 && t_offset_valid // clock averager 
15 && pulse && !read && tracking; // dp control signal. 



// 

// FFT window timing and sync acquisition/tracking timing counters. 

// 



always @(posedge elk) 

if (in_resync J | Inrst | [ t_reset) // Synchronous power-up reset. 

t__count <= 0; // Reset main timing counter, 

else if (enable_3_4 && t_retime_acq) // Retime to count from last 
25 t_count <= t_count - guard_active; // peak to current time. 

else if (enable_3_4 && ~track_mode) // Count if not in track mode 

t_count <= t_count + 1'b1 ; 

else if (enable_3_4 && t_retime_trk) // Otherwise must be in track 
t_count <= t_count - guard_active // so advance timing for acq 
30 + (2*FIFO_N + FIFO_n + 2); // FIFO_L read trig point then 

else if (enable_3_4) 

begin // wrap round t_count at 

if (t_count == 2047+guardJength) // end of guard+active length. 
t_count <= 0; // Needed as a reference to 

35 else // track peak movement in 

t_count <= t_count + 1 'b1 ; // capture window, 
end 

always @(posedge elk) 
40 if (in_resync | \ "nrst 1 1 g_a_reset) // Synchronous power-up reset. 
g_a_count <= 0; // Reset guard_active counter, 

else if (enable_3_4 && f__ratio_valid) // g_a count when f_ratio vald 
g_a_count <= g_a_count + 1'b1 ; // Guard active timing counter 

45 always @(posedge elk) // Datapath timing. counter. 

if (in_resync | ! Inrst 1 1 dpctl_reset) . // Synchronous reset. 

dp_count <= 0; // Reset datapath control. 

else if (enable_3_4 && -track_mode) // Always count in acquire 

dp_count <= dp_count + 1'b1; // mode on elk 0. 
50 else if (enable_3_4 && track_mode && read) // Count when reading data in 

dp_count <= dp_count + 1'b1; // tracking mode. 

always @(posedge elk) 

if (in_resync \ ! Inrst) // Synchronous reset. 

55 fifo_a_count <= 0; 

e\se if (enable_3_4 && t_offset_ctl) // Only clock averager if Trk 
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fifo_a_count <= fifo_a_count + 1'b1 ; // and t_offset is valid. 

always @(posedge elk) // Create pulse on entering 

if (enable_3_4) // track 4 or track 5 to elk 

5 . begin // t_offset_ctl once per state 

if ((state == trackl && // transition. We need to 
old_state != trackl) 1 1 // clock the averager only 
(state == track2 && // once on entering state 4 or 
old_state != track2)) // state 5 hence t_offset_ctl 
10 pulse <= 1*b1; // is gated with pulse, 

else 

pulse <= 1'b0; 
old_state <= state; 
end 

15 

always @(posedge elk) 
if (in_resync 1 1 !nrst) 

tracking <= 1 'bO; // Read from 2K/8K FIFO first, 

else if (enable_3_4 && track_mode 
20 && dp^count == FIFO_L+1 ) // Check if FIFO_L full in trk 

tracking <= 1'b1; //then read tracking FIFO_L. 

// 

// FFT window timing and sync acquisition/tracking FSM 
25 // 



30 



35 



40 



45 



50 



always @(posedge elk) 
if (in_resync 1 1 !nrst) 
begin 
state <= start; 
track_mode <= 1'b0; 
preset <= 1*b0; 
dpctl_reset <= 1*b0; 
g_a_reset <= 1'b0; 
rnax_peak <= 1'b0; 



retry <= 0; 



// Acquisition mode FSM. 
// Synchronous power-up reset. 

// FSM starts in resync. 

// Start in acquisition mode. 
// Reset main timing counter. 
II dp_ctl out of reset. 
// Reset guard__active counter. 
// Reset max peak value. 



acq_symbols <= 0; 
guard_yalid <= 1'b0; 
t_retime_acq <= 1'b0; 
t_retime_trk <= rbO; 
end 

else if (enable_3_4) 
case (state) 
TSOV start: begin 

g_a_reset <= VbO; 
t_reset <= 1'b0; 
guard_valid <= 1'b0; 



// Reset no of retry's. 



// Reset acquired no symbols. 
// Guard data is valid. 
// Do not retime at resync. 
// Do not retime at resync. 



// g_a_reset out of rst 
// t_coiint out of reset. 
// Guard invalid. 



// MUST ACT ON RETRYS TOO!! 
state <= peakl; // Enter peakl state, 
end 



/*S17 peakl: begin 

t_reset <= 1'bO; // t_count out of reset, 

if (g_a_count < 2048+512) // Search for pos peakl 
55 begin 

if (f_ratio > max_peak && 
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f__ratio < (1 « r_wordlength)) // Is new peak larger? 
begin 

max_peak <= fjratio; // If so assign max_peak 
t_reset <= 1 ; // Reset timing counter. 
5 end 
end 

else // First block complete, 

begin 

t__reset <= 1'b0; // t_count out of reset. 
1 0 g_a_reset <= 1 'b1 ; // Reset g_a_count. 

max_peak <= 1'b0; // Reset max peak value, 
state <= peak2; // Next block search. 



15 



end 
end 

/*S2V peak2: begin 

g_a_reset <= 1'b0; // Next block start cnt 



>f (9_a_count < 2048+512) // Search for pos peak2 
begin 

20 if (f_ratio > max_peak && 

f_ratio < (1 « r_wordlength)) // Is new peak larger? 
begin 

max_peak <= f_ratio; // If so assign max_peak 
guard_active <= t_count; //Assign guard_active. 
25 end 

end // Second block complete 

else if(// First, one peak per block situation (large guards) 
(guard_active < (2560+delta)&& // Test for 2048+512 
guard_active > (2560-delta))| j // pt guard length. 



30 



(guard_active < (2304+delta)&& // Test for 2048+256 
guard_active > (2304-delta))l | // pt guard length. 



(guard_active < (2176+delta)&& // Test for 2048+128 
35 guard_active > (2176-delta))| | // pt guard length. 

(guard_active < (21 12+delta)&& // Test for 2048+64 
guard_active > (21 12-delta))| | // pt guard length. 

40 // Now two peaks per block situation (small guards) 

(guard_active < (5120+delta)&& // Test 4096+512+512 
guard_active > (5120-delta))| | // pt guard length. 

(guard_active < (4608+delta)&& // Test 4096+256+256 
45 guard_active > (4608-delta))l | // pt guard length. 

(guard_active < (4352+delta)&& // Test 4096+128+128 
guard_active > (4352-delta))| | // pt guard length. 

50 (guard_active < (4224+delta)&& // Test 4096+64+64 

guard_active > (4224-delta))) // pt guard length, 
begin 

state <= peak3; // Next peak search. 
g_a_reset <= Vb1; // Reset g_a_count. 
55 max_peak <= 1'b0; // Reset maximum peak. 

guard_valid <= 1'b1; 
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t_retime_acq <= 1 *b1 ; 
end 

else // Acquisition failed so 

begin // jump to start and 

5 state <= start; // increment the retry 

retry <= retry + 1'b1; // counter. 
t_reset <= 1'b1 ; // Reset t_count. 
g_a_reset <= 1'b1 ; // Reset g_a_count. 
max_peak <= 1*b0; // Reset maximum peak. 
10 end 
end 

/*S3*/ peak3: begin 

t_retime_acq <= 1'b0; 
15 g_a_reset <= 1'b0; // Next block start cnt 

if (g_a_count < 2048+512) // Search for pos peak2 
begin 

if (f_ratio > max_peak && 

f_ratio < (1 « r_wordlength)) // Is new peak larger? 
20 begin 

max_peak <= f_ratio; // If so assign max_peak 
guard_active <= t_count; // Assign guard_active. 
end 

end // third block complete 

25 else if(// First, one peak per block situation (large guards) 

(guard_active < (2048+guardJength // Peak test 2048 
+delta)&& // + guard length. 
guard_active > (2048+guardJength 
-delta)) 1 1 

30 

// Now two peaks per block situation (small guards) 
(guard_active < (4096+(2*guardJength)// Peak 4096 + 2 

+delta)&& //"guard length. 
guard_active > (4096+(2*guardJength) 
35 -delta))) 
begin 

acq_symbols <= acq_symbols+1'b1 ;// Another sym acqurd 

g_a_jeset <= 1'b1 ; // Reset g_a_count. 
max_peak <= VbO; // Reset maximum peak. 
40 t_retime_trk <= Vb1; // Retime t_count to trk 

track_mode <= 1'b1 ; // Enter track mode. 
dpctl_reset <= 1'b1 ; // Reset datapath count 
state <= trackl ; // Enter trackl state, 
end 

45 else // Acquisition failed so 

begin // jump to start and 

state <= start; // increment the retry 

retry <=• retry + 1'b1; //counter. 

t_reset <= 1'b1 ; // Reset t_count. 
50 g_a_reset <= 1'b1 ; // Reset g_a_count. 

max_peak <= 1'b0; // Reset maximum peak. 

end 

end 

55 /*S4*/ trackl: begin 

t retime trk<=1'b0; II \ count out retime. 
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dpctl_reset <= 1'b0; // dp ctl out of reset, 
if (read && f_ratio_valid) // Peak detect on rd&vld 
begin 

if (f_ratio > max_peak && 
5 f_ratio < (1 « r_wordlength)) // Is new peak larger? 

begin 

max_peak <= f_ratio; // If so assign max_peak 
t_offset <= t_count; // Store peak offset, 
end 

10 if (read_address == FIFO_L-1) // If at end of FIFOJ. 

begin // move to next state, 

state <= track2; // (read_Addr <> FIFO_L) 
max_peak <= VbO; // Reset max peak value. 

end 

15 end 
else 

state <= trackl ; // else wait in trackl . 
end 



20 /*S5*/ track2: begin 

if (read && f_ratio_vaiid) // Peak detect on rd&vld 
begin 

if (f_ratio > max_peak && 

f_ratio < (1 « r__wordlength)) // Is new peak larger? 
25 begin 

max_peak <= f_ratio; // If so assign max_peak 
t_offset <= t_count; // Store peak offset 
end 

if (read_address == FIFO_L-1) // At end of FIFO_L 
30 begin // move to next state. 

state <= trackl ; // (read_Addr <> FIFOJ.) 

max_peak <= 1*b0; // Reset max peak value, 
end 
end 

35 else 

state <= track2; // Wait in this state, 
end 



default: state <= 3'bXXX; 
40 endcase 



// 

// FFT window output decode logic. 

// 

45 

always @(posedge elk) 

if (in_resync ; : !nrst) // Synchronous reset, 

outjqgi <= 6; 

else if (enable_3_4 && tracking && 
50 t_count == 15 f d0 - iqdemodjatency) // iqgi guard start, 

outjqgi <= 1'b1; 

else if (enable_3_4 && tracking && 

t_count == iqdemod_latency) // iqgi guard stop. 
ouMqgi <= 1'b0; 

55 

always @(posedge elk) 
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if (in_resync | j Inrst) // Synchronous reset. 

out_sincgi <= 0; 

else if (enable_3_4 && tracking && 

t_count == 15'dO - sincintjatency) // sincgi guard start. 
5 out_sincgi <= 1'b1; 

else if (enable_3_4 && tracking && //TO COMPLETE LATENCY STUFF 

t_count == sincinMatency) // sincgi guard stop. 
out__sincgi <= 1'bO; 

10 always @(posedge elk) // Count over active 

if (in_resync 1 1 Inrst) // interval to generate 

enable_fft <= 1'bO; // FFT valid pulse, 

else if (enable_3_4 && tracking && 
t_count == guardjength + FIFO_L/2 - w_advance) // FFT start point is 
15 enable_fft <= Vb1; // in middle of write 

else if (enable_3_4 && tracking && // into FIFO_L + adveed. 

fft_valid_count == 2047) // FFT stop after 2048 
enable_fft <= 1'bO; // samples. 

20 always @(posedge elk) 

if (in_resync 1 1 Inrst) // Synchronous reset. 

fft_valid_count <= 0; 

else if (enable_3_4 && tracking && -enable_fft) // Valid count = 0. 
fft_valid_count <= 0; // until fft is enabled. 

25 else if (enable_3_4 && tracking && enable_fft) 

fft_valid_count <= fft_valid_count + 1'b1 ; // Count when enabled. 

assign va!id_out = enable_fft & valid jn; //MUST SYNCHROS Vld every 3 elks? 

30 // 

// Synchronous RAM address generators. 

// „ 

always @(posedge elk) // Acqsition FIFO address gen. 

35 if (Inrst j | in_resync) // Synchronous reset. 

window_ram_addr <= 0; // Address gen for acq mode, 

else if (enable_2_8) 

window_ram_addr <= window_ram_addr + 1'b1; 

40 assign ram_enable_8 = enable_2_8 | \ enable_3_8 1 1 
enable_4_8 | j enable_5_8; 

always @(posedge elk) // Tracking FIFO address gen. 

begin 

45 if (Inrst 1 1 in_resync) 
begin 

read_address <= 0; // Reset track FIFO read addr. 

. write_address <= 0; // Reset track FIFO write addr 
write <= 1*b0; // Track FIFO, write disabled. 

50 read <=Tb0; //Track FIFO, read disabled, 

end 

else if (enable_3_4) 
begin 

if (track_mode && t_count == 0) // Track FIFO read 
55 read <= 1'b1; // trigger point. 
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if (read) // Read if read' 

begin // flag is set. 

if (read_address == FlFO_L-1) // Stop read at 
begin // end of FIFO. 

5 read_address <= 0; 

read <= 1*b0; // Clr read flag, 

end 
else 

read_address <= read_address + 1'b1; // tnc r address. 
10 end 

if (trackjnode && t_count == guard Jength+1 ) // Write if the 
write <= 1 'b1 ; // read is guard 

// depth into FIFO 

15 if (write) 

begin 

if (write_address == FIFOJ.-1) // Stop write at 

begin // end of FIFO. 

write_address <= 0; 
20 write <= 1'b0; 

end 
else 

write_address <= write_address + Vb1 ; // Inc w address. 

end 

25 end 
end 

always @(enable_1_4 or enabie_3_4 or read or write or // Assign read and 
read__address or write_address) // write addresses 
30 if (enable_3_4 && read) // onto common 

track_ram_address = read_address; // address bus 

else if (enable_1_4 && write) // for tracking 

track_ram_address = write_address; // tsyncram RAM. 

35 // 

// Thresholding function to determine precise guard interval. 
// . 

always @(posedge elk) 
40 if (enable_3_4 && guard_valid) 
begin 

// First, one peak per block situation (large guards) 

if (guard_active < (2560+delta)&& // Test for 2048+51 2 

guard_active > (2560-delta)) // pt guard length. 
45 begin 

out_rx_guard <= 2'b1 1 ; 

guardjength <= 512; 

end * • 

50 if (guard_active < (2304+delta)&& // Test for 2048+256 

guard_active > (2304-delta)) // pt guard length, 
begin 

out__rx_guard <- 2 f b10; 
guardjength <= 256; 
55 end 
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if (guard_active < (2176+delta)&& // Test for 2048+128 
guard_active > (2176-delta)) // pt guard length, 
begin 

out_rx__guard <= 2'b01; 
5 guardjength <= 128; 

end 

if (guard_active < (2 1 1 2+delta)&& // Test for 2048+64 
guard_active > (21 12-delta)) // pt guard length. 
10 begin 

out_rx_guard <= 2*b00; 
guardjength <= 64; 
end 

15 // Now two peaks per block situation (small guards) 

if (guard_active < (5120+delta)&& // Test for 4096+512+512 
guard_active > (5120-delta)) // 512 pt guard length, 
begin 

out_rx_guard <= 2'b1 1 ; 
20 guardjength <= 512; 

end 

if (guard^active < (4608+delta)&& // Test for 4096+256+256 
guard_active > (4608-delta)) // 256 pt guard length. 
25 begin 

out_rx_guard <= 2'b10; 
guardjength <= 256; 
end 

30 if (guard_active < (4352+delta)&& // Test for 4096+128+128 

guard_active > (4352-delta)) // 128 pt guard length, 
begin 

out_rx_guard <= 2'b01; 
guardjength <= 128; 
35 end 

if (guard_active < (4224+delta)&& // Test for 4096+64+64 
guard_active > (4224-delta)) // 64 pt guard length, 
begin 

40 out__rx_guard <= 2'bOO; 

guardjength <= 64; 
end 
end 

45 //.. . 

// Averager for t_offset in tracking mode. 

// 

assign t_offset_diff = t_offset - (2*FIFO_N + FIFO^n); //dly 2 for latency? 

50 

always @(posedge elk) 

if (in_resync | •! !nrst) //NEED TO ENABLE THIS!!!!!! 
t_offset_valid <= 0; 

else if ((t_offset_diff < (1 « 14 + 1) - t_offsetJhreshold && // Neg 
55 t_offset_diff > (1 « 14 - 1)) 1 1 

(t_offset_diff > t^offsetjhreshold && // Pos 
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t_offeet_diff < (1 « 14)) //CORRECT TO DETECT vld = 1 not 0 

) 

t_offset_valid <= 0; 
else 

5 t_offset_valid <= 1 ; 

assign t_offsetJhresh = (t_pffset_valid) ? t_offset_diff : 0; 

// Setup FIFO to perform moving summation of t_offset values. 
10 fft_sr_addr #(15, FIFO_A) sr_A (elk, t_offset_ct), 

t_offsetJhresh f // Input. 
t_offset_dly); // Output. 

// Compute the moving summation i.e t_offset(i-1) + t_offset(i-2) + ... 
15 // We must NOT truncate or round acc as the error will grow across a symbol, 
always @(posedge elk) 

if (in_resync 1 1 (nrst) // Clear accumulator at 

t_offset_avg <= 0; // power-up or Resync. 

else if (t_offset_ctl) // Wait until t_offset valid. 

20 // Subtract as well as add when averager is full. 
t_offset_avg <= t_offset_avg + t_offset_thresh 
- ((fifo_a_add_sub) ? t_offset_dly : 0); 

assign t_offset_scalled = 
25 {{(FIFO_A_bits){t_offset_avg[14]}},t_offset_avg[14:FIFO_A_bits]}; 

// 

// Code to determine conditions for advancing/retarding tracking window. 
// — : 

30 

assign read_pos = t_offset_scalled; // +ve (late) so 

// delay read 

assign read_neg = 2047 + guardjength + 1 - // -ve (early) so 
35 (~t_offset_scalled + 1); // advance read 

assign write_pos = guardjength + 1 + // +ve (late) so 

t_offset_scalled; // delay write 

40 // PROBLEMS WHEN offset > guardjength + 1 

// (should not happen as we range check peaks in acq mode) 
assign write_neg = guardjength + 1 - // -ve (early) so 

(-t_offset_scalled + 1); // advance write 

45 endmodule 

Listing 15 

// Sccsld: %W% %G% 
50 *™ * ****** 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

55 Description: Verilog code for a structural netlist coupling the Fast Fourier 
Transform (FFT) processor to the window acquisition hardware. 
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Notes : 



'timescale 1ns / 100ps 

module fft_top (i_data, 
q_data, 
10 elk, 
nrst, 

in_resync, 

in_2k8k, 

validjn, 

15 ram4_in, 
ram5_in, 
ram6_in, 
ram7_in, 
ram8_in, 
20 ram9_in, 

ram10_in, 
i_out, 
q_out, 
out_ovf, 

25 enable_0, 
enable_1, 
enable_2, 
enable_3, 
valid_out, 
30 ram4_out, 
ram5_out, 

ram6_out, 
ram7_out, 
ram8_out t 
35 ram9_out ( 
ram10_out, 
ram_addr, 
ram_enable, 
rarrwnotw, 
40 rom3_addr, 
rom4_addr, 
rom3_data, 
rom4_data, 
track_addr, 
45 track_data_in, 
track_data_out, 

track_rnw, 
track_ram_enable, 
out_rx_guard, 
50 outjqgi, 
. out_sincgi t 
ouMest); 



// 



55 // Parameter definitions. 
// 
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10 



15 



20 



25 



parameter 
parameter 
parameter 
parameter 
parameter 



parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 



// 
// 
// 



wordlength = 12; // Data wordlength. 
c_wordlength = 10; // Coeff wordlength. 
AddressSize =13; // Size of address bus. 
rom_AddressSize = 13; // ROM address bus size. 
mult_scale = 3; // Multiplier scalling: 

// 1 = /4096, 2 = /2048, 

//3 = /1024,4 = /512. 

r_wordlength = 10; // ROM data wordlength. 
FIFO_L = 256; // Tracking FIFO length. 
FIFO_L_bits = 8; // Track FIFO addr bits 
FIFCLN = 64; // Acc length S(i-j). 

// Acc length S(i-n-j). 
// t_offset delay FIFO. 

//Track FIFO bits. 
15; // log rom address size. 



FIFO_n = 64; 
FIFO_A = 32; 
FIFO_A_bits = 5; 
lu AddressSize = 



delta = 20; // Gu threshold distance 
acquired_symbols = 2; // Acq symbls before trk 
pos_threshold = 3; // for info only. 
t_offset__threshold = 10; // t_offset valid thresh 
w_advance =10; // win trig frm boundary 
sincintjatency = 2; // Latency to sine intep 
iqdemodjatency = 168; // Latency to IQ demod. 



Input/Output ports. 



input elk, // Master clock. 

nrst, // Power-up reset. 
30 in_2k8k t // 2K mode active low. 

validjn, // Input data valid. 
in_resync; 

input [9:0] i_data, // FFT input data, I. 
35 q_data; // FFT input data, Q. 

input [wordlength-3:0] track_data_out; 

input [wordlength*2-1:0] ram4_out, // Couple the l/Q data 
40 ram5_out, // outputs from the 

ram6_out, // memory to the 
ram7_out, // respective butterfly 
ram8_out, // processors. 
ram9_out, 
45 ram10 out; 



50 



55 



input [c_wordlength*2-1:0] rom3_data, 
rom4_data; 

output [rom_AddressSize-6:0] rom3_addr; 
output [rom_AddressSize-4:0] rom4_addr; 



output [14:0] 
output [1:0] 



out_test; // Temp testpin output. 
out_rx_guard; // Acquired gu length. 



10 



30 



40 
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output [wordlength-3:0] track_data_in; 

output [wordlength*2-1 :0] ram4_in, // Couple the l/Q data 
ram5_in, // outputs of each BF 
ram6jn, // processor to their 
ram7_in, // respective memory 
ram8_in, // inputs. 
ram9_in, 
ramlOjn; 

output [AddressSize-1:0] ram_addr; // RAM address bus. 



output out_ovf, // Overflow flag. 
enabie_0, // Enable clock 0. 
1 5 enable_1 , // Enable clock 1 . 

enable_2, // Enable clock 2. 
enable__3, // Enable clock 3. 
valid_out, // Output data valid. 
ram_enable, // RAM enable. 
20 ram_rnotw t 
trackjrnw, 
track_ram_enable, 

outjqgi, 
out_sincgi; 

25 

output [FIFO_L_bits-1:0] track_addr; 

output [wordlength-1:0] i_out, // FFT output data, 
q__out; // FFT output data, Q. 

// 

// Wire/register declarations. 

// 

35 wire [9:0] i_data, // FFT/WIN input I.' 

q_data; // FFT/WIN output Q. 



wire [wordlength-1:0] i_out, // FFT output data, I. 
q_out; // FFT output data, Q. 



wire [wordlength*2-1:0] ram4_in, 
ramSjn, 
ram6jn, . 
ram7_in, 
45 ram8_in, 
ram9_in, 
.ramlOjn; 

wire [wordlength*2-1:0] ram4_out, 
50 ram5_out, 
ram6_out, 
ram7_out, 
ram8_out, 
ram9_out, 
55 ram10_out; 
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wire [AddressSize-1:0] ram_addr, // RAM address bus. 
ra m_a d d r_fft_2_w i n ; 

wire elk, 
5 nrst, 

in_2k8k, 
in_resync, 
validjn, 
out_ovf, 
10 enable_0, 
enable_1, 
enable_2, 
enable_3, 
valid_out, 

15 ram_enable, // RAM enable signal. 

ram_rnotw, 
valid_win_2_fft, 
ra m_rn otw_fft_2_wi n , 
r a m_e n a b I e_fft_2_ w i n , 
20 track_rnw, 

track_ram_enable, 

out_iqgi, 
out_sincgi; 

25 wire [wordiength-1:0] x1r_10, x1M0, 
z2r 10, z2M0; 



30 



wire [wordlength-3:0] track_data_in, 
track_data_out; 

wire [FIFO_L_bits-1:0] track_addr; 

wire [1:0] out_rx_guard; // Determined guard. 

35 wire [c_wordlength*2-1:0] rom3_data, 
rom4 data; 



40 



wire [rom_AddressSize-6:0] rom3_addr; 
wire [rom_AddressSize-4:0] rom4_addr; 

wire [14:0] outjest; 



// 

// Instance FFT processor. 
45 // 



fft_r22sdf #(wordlength, 
■ c_wordlength, 
AddressSize, 
50 rom_AddressSize, 
mult_scale) 
fft (.in_xr(i_data), // FFT input data, I. 
.in_xi(q_data), // FFT input data, Q 
.clk(clk), // Master clock. 
55 .nrst(nrst), // Power-up reset 

.in__2k8k(in_2k8k), // 2K active low. 
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10 



15 



20 



25 



30 



35 



40 



45 



.valid_Jn(valid_win_2_fft),// Input valid. 
out_xr(i_out), // FFT output data, I. 
.out_xi(q_out), // FFT output data, Q. 

.out_ovf(out_pvf), // Overflow flag. 
enable_0(enable_0), 
.enable_1 (enable_1 ), 
.enable_2(enable_2), 
.enable_3(ram_rnotw_fft_2_win), 

.valid_out(valid_out), 
.ram_address(ram_addr__fft_2_win), 
. ram_enable(ram_enable_fft_2_win) , 
.address_rom3(rom3_addr), 
. add ress_rom4( rom4_addr) , 

// RAM input ports. 

.z2r_4(ram4_in[wordlength-1 :0]), 
.z2i_4(ram4_in[wordlength*2-1 :wordlength]), 

.z2r_5(ram5_in[wordlength-1:0]) t 
.z2i_5(ram5jn[wordlength*2-1:wordlength]), 

.z2r_6(ram6jn[wordlength-1:0]), 
z2i_6(ram6Jn[wordlength*2-1:wordlength]), 

.z2r_7(ram7_in[wordlength-1:0]) ) 
.z2i_7(ram7_in[wordlength*2-1 :wordlength]), 

.z2r_8(ram8_in[wordlength-1:0]) t 
.z2i_8(ram8_in[wordlength*2-1:wordlength]) t 

.z2r_9(ram9_in[wordlength-1:0]), 
.z2i_9(ram9_in[wordlength*2-1 :wordlength]), 

.z2r_10(z2r_10),// Frm FFT datapath to window (I). 
.z2M0(z2M0),// Frm FFT datapath to window (Q). 

// RAM output ports. 

.x1 r_4(ram4_out[wordlength-1 :0]), 
.x1 i_4(ram4_out[wordlength*2-1 :wordlength]), 

.x1 r_5(ram5__out[wordlength-1 :0]), 
.x1 i_5(ram5_out[wordlength*2-1 :wordlength]), 

.x1 r_6(ram6_out[wordlength-1 :0]) t 
.x1 i_6(ram6_out[wordlength*2-1 :wordlength]), 

.x1 r_7(ram7_out[wordlength-1 :0]), 
.x1 iJ7(ram7_out[wordlength*2-1 :wordlength]) t 

.x1 r_8(ram8_out[wordlength-1 :0]), 
.x1 i_8(ram8_out[wordiength*2-1 :wordlength]) t 

.x1 r_9(ram9_out[wordlength-1 :0]), 
.x1 i_9(ram9_out[wordlength*2-1 :wordlength]), 

.x1 r_1 0(x1 rj 0),// To FFT datapath frm window (I). 
.x1M0(x1M0) t //To FFT datapath frm window (Q). 

// ROM output ports. 
• ..br_3(rom3_data[c_wordlength*2--1 :c_wordlength]) t 
.bL3(rom3_data[c__wordlength-1:0]), 
.br_4(rom4_data[c_wordlength*2-1 :c_wordlength]), 
.bi_4(rom4_data[c_wordlength-1:0])); 



Instance FFT window processor. 
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fft_window #(wordlength, 
r_wordlength t 

AddressSize, 
FIFO_L, 

5 FIFO_L_bits, 
FIFOJM, 
FIFO_n, 
FIFO_A, 
FIFO__A_bits, 
10 lu_AddressSize, 
delta, 

acquired_symbols, 
pos_threshoid, 
t_offset_threshold, 
15 w_advance, 

sincintjatency, 
iqdemod_latency) 
window (.in_xr(i_data), 
.in_xi(q_data), 
20 .clk(clk), 
.nrst(nrst), 
valid_in(validjn), 
.valid_out(valid_win_2_fft), 
.in_resync(in_resync) 1 
25 .ouMqgi(outJqgi), 

.out_sincgi(out_sincgi), 
:out_rx_guard(out_rx_guard), 
.out_acquired(out_acquired), 
. o u t_fft_w i n d o w ( o u t_fft_ w i n d o w ) , 
30 .enable_3_4(enabie_3), 
.out_test(out_test), 
.track_ram_address(track_addr), 
.xri_tmp1 (track__data_in) t 
.xri_tmp5(track_data_out), 
35 .track_ram_rnotw(track_rnw), 

.track_ram_enable(track_ram_enable), 
.ram_addr(ram_addr), 

.ram_enable(ram_enable), 
.ram_rnotw(ram_rnotw), 
40 .ram10Jn(ram10Jn), //To 1K x 24 bit RAM. 

.ram10_out(ram10_out), // From 1K x 24 bit RAM. 
.x1r_10(x1r_10), //To FFT datapath (I). 
.x1M0(x1M0)i //To FFT datapath (Q). 
.z2r_10(z2r_10), // From FFT datapath (I) 
45 .z2M0(z2M0), // From FFT datapath (Q) 

.fft_ram_rnotw(ram_rnotw_fft_2_win) t • 
.fft_ram_enable(ram_enable_fft_2_win), 
.fft_ram_addr(ram_addr_fft_2_win)); 

endmodule 

50 

Listing 16 

// 2048 point FFT twiddle factor coefficients (Radix 4+2). 
// Coefficients stored as non-fractional 10 bit integers (scale 1 ). 
55 // Real Coefficient (cosine value) is coefficient high-byte. 

// Imaginary Coefficient (sine value) is coefficient low-byte. 
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-0.348419 
-0.351293 
-0.354164 
-0.357031 
-0.359895 
-0.362756 
-0.365613 
-0.368467 
-0.371317 
-0.374164 
-0.377007 
-0.379847 
-0.382683 
-0.385516 
-0.388345 
-0.391170 
-0.393992 
-0.396810 
-0.399624 
-0.402435 
-0.405241 
-0.408044 
-0.410843 
-0.413638 
-0.416430 
-0.419217 
-0.422000 
-0.424780 
-0.427555 
-0.430326 
-0.433094 
-0.435857 
-0.438616 
-0.441371 
-0.444122 
-0.446869 
-0.449611 
-0.452350 
-0.455084 
-0.457813 
-0.460539 
-0.463260 
-0.465976 
-0.468689 
-0.471397 
-0.474100 
-0.476799 
-0.479494 
-0.482184 
-0.484869 
-0.487550 
-0.490226 
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0110111101 
0110111101 

0110111100 
0110111011 
5 0110111010 
0110111010 
0110111001 
0110111000 
0110110111 

10 0110110110 
0110110110 
0110110101 
0110110100 
0110110011 

15 0110110010 
0110110001 
0110110001 
0110110000 
0110101111 

20 0110101110 
0110101101 
0110101100 
0110101011 
0110101011 

25 0110101010 
0110101001 
0110101000 
0110100111 
0110100110 

30 0110100101 
0110100100 
0110100100" 
0110100011 
0110100010 

35 0110100001 
0110100000 
0110011111 
0110011110 
0110011101' 

40 0110011100 
0110011011' 
0110011010" 
0110011001' 
0110011000" 

45 0110010111" 
0110010111" 
0110010110 
0110010101 
0110010100' 

50 0110010011' 
0110010010' 
0110010001' 
0110010000' 
0110001111 

55 0110001110 
0110001101 



1100000100 

1100000010 
"1100000001 
"1100000000 
'1011111110 
"1011111101 
'1011111011 
'1011111010 
"1011111001 
'1011110111 
"1011110110 
"1011110101 
'1011110011 
'1011110010 
"1011110001 
'1011101111 
'1011101110 
"1011101101 
'1011101011 
"1011101010 

1011101001 
"1011100111 
"1011100110 
"1011100101 

1011100100 
"1011100010 
"1011100001 
"1011100000 
"1011011110 
"1011011101 
"1011011100 
"1011011010 
"1011011001 
"1011011000 
"1011010111 
"1011010101 
"1011010100 
"1011010011 
"1011010010 
"1011010000 
"1011001111 
"1011001110 
"1011001100 
"1011001011 
"1011001010 
"1011001001 
"1011000111 
"1011000110 
"1011000101 
"1011000100 
"1011000011 
"1011000001 
"1011000000 
"1010111111 
"1010111110 
"1010111100 



// W0168_ 
//W0 169 
// W0 170" 
// W0171" 
// W0172" 
// W0173I 
// W0174 
// W0175" 
// W0 176" 
// W0 177" 
// W0 178" 
// W0179" 
// W0180" 
// W0181" 
//W0 182" 
// W0183" 
// W0184" 
//W0185" 
//W0186" 
// W0 187" 
// W0188" 
//W0189" 
//W0190" 
//W0191" 
// W0 192" 
// W0193" 
//W0194" 
// W0195" 
// W0 196" 
// W0 197" 
// W01 98" 
// W0 199" 
// W0200" 
//W0201" 
// W0202" 
// W0203" 
// W0204" 
// W0205" 
// W0206" 
// W0207" 
// WO208" 
// W0209" 
// W0210" 
// W0211" 
// W0212" 
// W0213" 
// W0214" 
// W0215" 
// W0216" 
// W0217" 
// W0218" 
// W0219" 
// W0220" 
// W0221" 
// W0222" 
// W0223" 



2048 = 
2048 : 
2048 : 
2048 = 
2048 : 
2048 : 
2048 : 
2048 ■ 
'2048 : 
'2048 ; 
'2048 ■ 
2048 = 
'2048 = 
'2048 = 
'2048 : 
2048 : 
'2048 : 
2048 : 
'2048 ■■ 
'2048 = 
2048 = 
2048 : 
'2048 = 
"2048 ■■ 
"2048 ■■ 
'2048 
"2048 
'2048 
'2048 
"2048 
"2048 
'2048 
"2048 
"2048 
"2048 
"2048 
2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
2048 
2048 
"2048 



+0.870087 
+0.868571 
+0.867046 
+0.865514 
+0.863973 
+0.862424 
+0.860867 
+0.859302 
+0.857729 
+0.856147 
+0.854558 
+0.852961 
+0.851355 
+0.849742 
+0.848120 
+0.846491 
+0.844854 
+0.843208 
+0.841555 
+0.839894 
+0.838225 
+0.836548 
+0.834863 
+0.833170 
+0.831470 
+0.829761 
+0.828045 
+0.826321 
+0.824589 
+0.822850 
+0.821103 
+0.819348 
+0.817585 
+0.815814 
+0.814036 
+0.812251 
+0.810457 
+0.808656 
+0.806848 
+0.805031 
+0.803208 
+0.801376 

■ +0.799537 
+0.797691 

= +0.795837 
= +0.793975 
= +0.792107 
= +0.790230 

■ +0.788346 
= +0.786455 
' +0.784557 

■ +0.782651 
= +0.780737 
' +0.778817 
= +0.776888 
= +0.774953 



-0.492898 
-0.495565 
-0.498228 
-0.500885 
-0.503538 
-0.506187 
-0.508830 
-0.511469 
-0.514103 
-0.516732 
-0.519356 
-0.521975 
-0.524590 
-0.527199 
-0.529804 
-0.532403 
-0.534998 
-0.537587 
-0.540171 
-0.542751 
-0.545325 
-0.547894 
-0.550458 
-0.553017 
-0.555570 
-0.558119 
-0.560662 
-0.563199 
-0.565732 
-0.568259 
-0.570781 
-0.573297 
-0.575808 
-0.578314 
-0.580814 
-0.583309 
-0.585798 
-0.588282 
-0.590760 
-0.593232 
-0.595699 
-0.598161 
-0.600616 
-0.603067 
-0.605511 
-0.607950 
-0.610383 
-0.612810 
-0.615232 
-0.617647 
-0.620057 
-0.622461 
-0.624859 
-0.627252 
-0.629638 
-0.632019 
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0110001100 
0110001011 
0110001010 
0110001001 
5 0110001000 
0110000111 
0110000110 
0110000101 
0110000100 

10 0110000011 
0110000010 
0110000001 
0110000000 
0101111111 

15 0101111101 

0101111100 

0101111011 
0101111010 
0101111001 

20 0101111000 
0101110111 
0101110110 
0101110101 
0101110100 

25 0101110011 
0101110010 
0101110001 
0101110000 
0101101110 

30 0101101101 
0101101100 
0101101011 
0101101010 
0101101001" 

35 0101101000' 
0101100111" 
0101100110" 
0101100100' 
0101100011" 

40 0101100010" 
0101100001' 
0101100000" 
0101011111" 
0101011110" 

45 0101011100" 
0101011011" 
0101011010" 
010101-1001" 
0101011000' 

50 0101010111" 
0101010110" 
0101010100 
0101010011 
0101010010" 

55 0101010001 
0101010000" 



1010111011 
"1010111010 
'1010111001 
"1010111000 
'1010110110 
"1010110101 
"1010110100 
"1010110011 
'1010110010 
"1010110000 
"1010101111 
'1010101110 
'1010101101 
'1010101100 
'1010101010 
'1010101001 
'1010101000 
'1010100111 
'1010100110 
'1010100101 
"1010100100 
"1010100010 
"1010100001 
"1010100000 
'1010011111 
'1010011110 
"1010011101 
"1010011100 
"1010011010 
'1010011001 
'1010011000 
'1010010111 
"1010010110 
"1010010101 
"1010010100 
"1010010011 
"1010010010 
"1010010000 
"1010001111 
"1010001110 
"1010001101 
"1010001100 
"1010001011 
"1010001010 
"1010001001 
"1010001000 
"1010000111 
"1010000110 
'1010000101 
"1010000100 
"1010000011 
"1010000001 
"1010000000 
"1001111111 
"1001111110 
"1001111101 



// W0224 
// W0225" 
// W0226" 
// W0227" 
// W0228' 
// W0229' 
// W0230' 
// W0231' 
// W0232" 
// W0233' 
// W0234" 
// W0235' 
// W0236" 
// W0237" 
// W0238" 
// W0239' 
// W0240" 
// W0241" 
// W0242' 
// W0243' 
// W0244" 
// W0245" 
// W0246" 
// W0247' 
// W0248' 
// W0249" 
// W0250' 
// W0251" 
// W0252" 
// W0253" 
// W0254" 
// W0255" 
// W0256' 
// W0257' 
// W0258" 
// W0259' 
// W0260' 
// W0261" 
// W0262' 
// W0263' 
// W0264" 
// W0265" 
// W0266' 
// W0267" 
// W0268' 
// W0269" 
// W0270' 
// W0271" 
// W0272" 
// W0273" 
// W0274' 
// W0275' 
// W0276" 
// W0277' 
// W0278' 
// W0279 



2048 

2048 
_2048 
_2048 

2048 

2048 
"2048 

2048 

2048 
"2048 

2048 
"2048 

2048 
"2048 
"2048 

2048 
"2048 
"2048 
"2048 
"2048 

2048 
"2048 
"2048 

2048 

2048 
"2048 
"2048 
"2048 
"2048 

2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 

2048 
"2048 
"2048 
"2048 

2048 
"2048 
"2048 

2048 
"2048 

2048 

2048 

2048 
"2048 



+0 


.773010 


-0 


634393 


+0 


.771061 


-0 


636762 


+0 


769103 


-0 


.639124 


+0 


.767139 


-0 


.641481 


+0 


.765167 


-0 


643832 


+0 


.763188 


-0 


.646176 


+0 


.761202 


-0 


.648514 


+0 


759209 


-0 


.650847 


+0 


757209 


-0 


.653173 


+0 


.755201 


-0 


655493 


+0 


753187 


-0 


.657807 


+0 


.751165 


-0 


660114 


+0 


749136 


-0 


662416 


+0 


747101 


-0 


.66471 1 


+0 


745058 


-0 


667000 


+0 


743008 


-0 


669283 


+0 


740951 


-0 


671559 


+0 


738887 


-0 


673829 


+0 


736817 


-0 


676093 


+0 


734739 


-0 


678350 


+0 


732654 


-0 


680601 

WWW 1 


+0 


730563 

v \f \J 


-0 


682846 


+0 


728464 


-0 


685084 

V/ \J \S T 


+0 


726359 


-0 


687315 


+0 


724247 


-0 


689541 

\J w \J r 1 


+0 


722128 


-0 


691759 


+0 


720003 

• W W 


-0 


693971 


+0 


717870 


-0 


696177 


+0 


715731 


-0 


698376 


+0 


713585 


-0 


700569 


+0 


71 1432 


-0 


702755 


+0 


709273 


-0 


704934 


+0 


707107 


-0 


707107 


+0 


704934 


-0.709273 


+0 


702755 


-0.711432 


+0 


700569 


-0.713585 


+0 


698376 


-0 


715731 


+0 


696177 


-0 


717870 


+0 


693971 


-0 


720003 


+0 


691759 


-0 


722128 


+0 


689541 


-0 


724247 


+0 


687315 


-0 


726359 


+0 


685084 


-0 


728464 


+0 


682846 


-0 


730563 


+0 


680601 


-0 


732654 


+0 


678350 


-0 


734739 


+0 


676093 


-0 


736817 


+0 


673829 


. -0 


738887 


+0 


671559 


-0 


740951 


+0 


669283 


-0 


743008 


+0 


667000 


-0 


745058 


+0 


664711 


-0 


747101 


+0 


662416 


-0 


749136 


+0 


660114 


-0 


751165 


+0 


657807 


-0 


753187 


+0 


655493 


-0 


755201 
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0101001110 
0101001101 
0101001100 
0101001011 
5 0101001010 
0101001000 
0101000111 
0101000110" 
0101000101" 

10 0101000100 
0101000010 
0101000001" 
0101000000 
0100111111 

15 0100111101 
0100111100 
0100111011" 
0100111010 
0100111001 

20 0100110111 
0100110110" 
0100110101 
0100110100 
0100110010 

25 0100110001 
0100110000 
0100101110" 
0100101101" 
0100101100" 

30 0100101011" 
0100101001" 
0100101000' 
0100100111" 
0100100110" 

35 0100100100" 
0100100011 
0100100010 
0100100000" 
0100011111 

40 0100011110" 
0100011100' 
0100011011' 
0100011010' 
0100011001' 

45 0100010111 
0100010110" 
0100010101' 
0100010011' 
0100010010' 

50 0100010001' 
0100001111 
0100001110 
0100001101' 
0100001011' 

55 0100001010' 
0100001001' 



1001111100 
"1001111011 
"1001111010 
"1001111001 
"1001111000 
"1001110111 
"1001110110 

1001110101 
"1001110100 
"1001110011 
"1001110010 
"1001110001 
"1001110000 
"1001101111 
"1001101110 
"1001101101 
"1001101100 
"1001101011 
"1001101010 
"1001101001 
"1001101001 
"1001101000 
"1001100111 
"1001100110 
"1001100101 

1001100100 
"1001100011 
"1001100010 
"1001100001 
"1001100000 
"1001011111 
"1001011110 
"1001011101 
"1001011100 
"1001011100 
"1001011011 

1001011010 
"1001011001 
"1001011000 
"1001010111 
"1001010110 

1001010101 
J 001010101 

1001010100 
"1001010011 

1001010010 
"1001010001 
1100.1010000 

1001001111 
"1001001111 
"1001001110 

1001001101 
"1001001100 
"1001001011 

1001001010 
"1001001010 



//W0280 
// W0281" 
// W0282" 
// W0283" 
// W0284" 
// W0285" 
// W0286" 
// W0287" 
// W0288" 
// W0289" 
// W0290" 
// W0291" 
// W0292" 
// W0293" 
// W0294" 
// W0295" 
// W0296" 
// W0297" 
// W0298" 
// W0299" 
// W0300" 
// W0301" 
// W0302" 
// W0303" 
// W0304" 
// W0305" 
// W0306" 
// W0307" 
// W0308" 
// W0309" 
// W0310" 
// W0311" 
// W0312" 
// W0313" 
// W0314" 
// W0315" 
// W0316" 
// W0317" 
// W0318" 
// W0319" 
// W0320" 
// W0321" 
// W0322" 
// W0323" 
// W0324" 
//•W0325" 
// W0326" 
II W0327" 
// W0328" 
// W0329" 
// W0330" 
// W0331" 
// W0332" 
// W0333" 
// W0334" 
// W0335" 



2048 
"2048 
'2048 
'2048 
'2048 
"2048 
"2048 
'2048 
"2048 
'2048 
'2048 
'2048 
'2048 
'2048 
"2048 
"2048 
'2048 
'2048 
'2048 
'2048 
2048 
2048 
'2048 
'2048 
'2048 
'2048 
"2048 
'2048 
'2048 
'2048 
'2048 
'2048 
'2048 
'2048 
"2048 
'2048 
'2048 
2048 
'2048 
2048 
'2048 
'2048 
'2048 
2048 
'2048 
'2048 
2048 
'2048 
'2048 
'2048 
'2048 
2048 
'2048 
2048 
2048 
'2048 



+0.653173 
+0.650847 
+0.648514 
+0.646176 
+0.643832 
+0.641481 
+0.639124 
+0.636762 
+0.634393 
+0.632019 
+0.629638 
+0.627252 
+0.624859 
+0.622461 
+0.620057 
+0.617647 
+0.615232 
+0.612810 
+0.610383 
+0.607950 
+0.605511 
+0.603067 
+0.600616 
+0.598161 
+0.595699 
+0.593232 
+0.590760 
+0.588282 
+0.585798 
+0.583309 
+0.580814 
+0.578314 
+0.575808 
+0.573297 
+0.570781 
+0.568259 
+0.565732 
+0.563199 
+0.560662 
+0.558119 
+0.555570 
+0.553017 
+0.550458 
+0.547894 
+0.545325 
+0.542751 
+0.540171 
+0.537587 
+0.534998 
+0.532403 
+0.529804 
+0.527199 
+0.524590 
+0.521975 
+0.519356 
+0.516732 



-0.757209 
-0.759209 
-0.761202 
-0.763188 
-0.765167 
-0.767139 
-0.769103 
-0.771061 
-0.773010 
-0.774953 
-0.776888 
-0.778817 
-0.780737 
-0.782651 
-0.784557 
-0.786455 
-0.788346 
-0.790230 
-0.792107 
-0.793975 
-0.795837 
-0.797691 
-0.799537 
-0.801376 
-0.803208 
-0.805031 
-0.806848 
-0.808656 
-0.810457 
-0.812251 
-0.814036 
-0.815814 
-0.817585 
-0.819348 
-0.821103 
-0.822850 
-0.824589 
-0.826321 
-0.828045 
-0.829761 
-0.831470 
-0.833170 
-0.834863 
-0.836548 
-0.838225 
-0.839894 
-0.841555 
-0.843208 
-0.844854 
-0.846491 
-0.848120 
-0.849742 
-0.851355 
-0.852961 
-0.854558 
-0.856147 
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0100000111 
0100000110 
0100000101 
0100000011 
5 0100000010 
0100000000 
0011111111 
0011111110 
0011111100" 

10 0011111011 
0011111010 
0011111000 
0011110111 
0011110110 

15 0011110100 
0011110011 
0011110001 
0011110000 
0011101111 

20 0011101101_ 
0011 101 100_ 
0011101010 
0011101001 
0011101000 

25 0011 1001 10_ 
0011100101 
0011100011 
0011100010 
0011100001 

30 0011011111 
0011011110" 
0011011100 
0011011011" 
0011011001" 

35 0011011000" 
0011010111 
0011010101 
0011010100 
0011010010" 

40 0011010001 
0011001111 
0011001110" 
0011001101" 
0011001011" 

45 0011001010" 
0011001000" 
0011000111" 
0011000101" 
0011000100" 

50 0011000010" 
0011000001" 
0011000000" 
0010111110" 
0010111101" 

55 0010111011" 
0010111010 



1001001001 
1001001000 
1001000111 
1001000110 
1001000110 
1001000101 
1001000100 
1001000011 
1001000011 
1001000010 
1001000001 
1001000000 
1000111111 
1000111111 
1000111110 
1000111101 
1000111100 
1000111100 
1000111011 
1000111010 
1000111010 
1000111001 
1000111000 
1000110111 
1000110111 
1000110110 
1000110101 
1000110101 
1000110100 
1000110011 
1000110011 
1000110010 
1000110001 
1000110000 
1000110000 
1000101111 
1000101111 
1000101110 
1000101101 
1000101101 
1000101100 
1000101011 
1000101011 
1000101010 
1000101001 
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// W1323I 
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// W1347 
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// W1392" 
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// W1440" 
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// W1467" 
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// W1476" 
// W1479" 
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'2048 
"2048 
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' -0.245955 
= -0.237024 
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: -0:173984 
-0.1 6491 3 
-0.155828 
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Listing 17 





// 512 point FFT twiddle factor coefficients (Radix 4+2). 

// Coefficients stored as non-fractional 10 bit integers (scale 1 ). 

// Real Coefficient (cosine value) is coefficient high-byte. 

// Imaginary Coefficient (sine value) is coefficient low-byte. 
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// W0032_0512 = +0.923880 
// W0033JD512 = +0.919114 
// W0034_0512 = +0.914210 
// W0035_0512 = +0.909168 
// W0036_0512 = +0.903989 
//W0037_0512 = +0.898674 
//W0038_0512 = +0.893224 
// W0039_0512 = +0.887640 
// W0040_0512 = +0.881921 
// W0041_0512 = +0.876070 
// W0042_0512 = +0.870087 
// W0043_0512 = +0.863973 
// W0044_0512 = +0.857729 
// W0045_0512 = +0.851355 
//W0046_0512 = +0.844854 
// W0047_0512 = +0.838225 
// W0048_0512 = +0.831470 
// W0049_0512 = +0.824589 
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// W0052_0512 = +0.803208 
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_0512 = 
0512 = 
10512 = 
_0512 = 
_0512 = 
0512 = 
"0512 = 
"0512 = 
10512 = 
0512 = 
"0512 = 
0512 = 
"0512 = 
"0512 = 
0512 = 
"0512 = 
"0512 = 
0512 = 
0512 = 
"0512 = 
"0512 = 
"0512 = 
0512 = 
"0512 = 
'0512 = 
0512 = 
"0512 = 
'0512 = 
"0512 = 
'0512 
"0512 
0512 
"0512 
0512 
0512 
0512 
0512 
0512 
0512 
0512 
0512 
0512 



= +0.471397 
= +0.460539 
= +0.449611 
= +0.438616 
= +0.427555 
= +0.416430 
= +0.405241 
= +0.393992 
= +0.382683 
'■ +0.371317 
= +0.359895 
= +0.348419 

■ +0.336890 
- +0.325310 
= +0.313682 
= +0.302006 
= +0.290285 

■ +0.278520 
= +0.266713 
= +0.254866 
= +0.242980 
■■ +0.231058 
= +0.219101 
= +0.207111 

■ +0.195090 

■ +0.183040 
' +0.170962 

+0.158858 
+0.146730 
+0.134581 
+0.122411 
+0.110222 
+0.098017 
+0.085797 
+0.073565 
+0.061321 
+0.049068 
+0.036807 
+0.024541 
+0.012272 
+0.000000 
-0.012272 
-0.024541 
-0.049068 
-0.073565 
-0.085797 
-0.098017 
-0.122411 
-0.146730 
-0.158858 
-0.170962 
-0.195090 
-0.219101 
-0.231058 
-0.242980 
-0.266713 



-0.881921 

-0.887640 

-0.893224 

-0.898674 

-0.903989 

-0.909168 

-0.914210 

-0.919114 

-0.923880 

-0.928506 

-0.932993 

-0.937339 

-0.941544 

-0.945607 

-0.949528 

-0.953306 

-0.956940 

-0.960431 

-0.963776 

-0.966976 

-0.970031 

-0.972940 

-0.975702 

-0.978317 

-0.980785 

-0.983105 

-0.985278 

-0.987301 

-0.989177 

-0.990903 

-0.992480 

-0.993907 

-0.995185 

-0.996313 

-0.997290 

-0.998118 

-0.998795 

-0.999322 

-0.999699 

-0.999925 

-1.000000 

-0.999925 

-0.999699 

-0.998795 

-0.997290 

-0.996313 

-0.995185 

-0.992480 

-0.989177 

-0.987301 

-0.985278 

-0.980785 

-0.975702 

-0.972940 

-0.970031 

-0.963776 
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1101101011_1000010110 
1101 100101_100001 1000 
1101011111_1000011010 
1101010100_1000011110 
5 1101001000_1000100010 
1 101 00001 0_1 0001 001 01 
1100111100_1000100111 
1 1001 10001_1000101 100 
1100100101_10001 10001 

10 1100011111_1000110100 
1100011010_1000110111 
1 100001 111_10001 11 100 
1100000100_1001000011 
1011111110_1001000110 

15 1011111001_1001001001 
1011101 110_1001001111 
1011100100_1001010110 
1011011110_1001011010 
101101 1001_100101 1 101 

20 1011001111_1001100101 
1011000101_1001101100 
1 01 1 000000_1 001 1 1 0000 
1010111011_1001110100 
1010110010_1001111100 

25 1010101000_1010000101 
1010100100_1 010001001 
1010011111_1010001101 
1010010110_1010010110 
1010001101_1010011111 

30 1010001001_1010100100 
1010000101_1010101000 
1001111100_1010110010 
1001110100_1010111011 
1 001 1 1 0000_1 01 1 000000 

35 1001101100_1011000101 
1001100101_1011001111 
1001011101_1011011001 
1001011010_1011011110 
1001010110_1011100100 

40 1001001111_1011101110 
1001001001_1011111001 
1001000110_10111 1 1110 
100100001 1_1 100000100 
10001 11100_1100001111 

45 1000110111_1100011010 
1000110100_1100011111 
10001 1 0001_1 1 001 001 01 

• 1000101 ioa_i 1001 10001 

1000100111_1100111100 
50 1000100101_1 101000010 
1000100010_1 101001000 
1000011110_1101010100 
1 00001 1 01 C_1 101011111 
1 00001 1000_1 101 1001 01 
55 1000010110_T101101011 
1000010011 1101110111 
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// W0152_0512 = -0.290285 
// W0153_0512 = -0.302006 
// W0154_0512 = -0.313682 
// W0156_0512 = -0.336890 
// W0158_0512 = -0.359895 
//W0159_051 2 = -0.371317 
// W0160_0512 = -0.382683 
// W0162_0512 = -0.405241 
// W0164_0512 = -0.427555 
// W0165_0512 = -0.438616 
// W0166_0512 = -0.449611 
// W0168J3512 = -0.471397 
// W0170_0512 = -0.492898 
// W0171_0512 = -0.503538 
// W0172_0512 = -0.514103 
// W0174JD512 = -0.534998 
// W0176_0512 = -0.555570 
// W0177_0512 = -0.565732 
// W0178JD512 = -0.575808 
// W0180_0512 = -0.595699 
// W0182J3512 = -0.6 1 5232 
// W0183_0512 = -0.624859 
// W0184_0512 = -0.634393 
// W0186_0512 = -0.653173 
// W0188_0512 = -0.671559 
// W0189JD512 = -0.680601 
// W0190_0512 = -0.689541 
// W0192_0512 = -0.707107 
// W0194_0512 = -0.724247 
// W0195_0512 = -0.732654 
// W0196_0512 = -0.740951 
// W0198_0512 = -0.757209 
// W0200_0512 = -0.773010 
// W0201_0512 = -0.780737 
// W0202_0512 = -0.788346 
// W0204_0512 = -0.803208 
// W0206_0512 = -0.817585 
// W0207_0512 = -0.824589 
// W0208_0512 = -0.831470 
// W0210JD512 = -0.844854 
// W0212_0512 = -0.857729 
// W0213_0512 = -0.863973 
// W0214_0512 = -0.870087 
// W0216_0512 = -0.881921 
// W0218_0512 = -0.893224 
II W0219_0512 = -0.898674 
// W0220J3512 = -0.903989 
// W0222_0512 = -0.914210 
// W0224J3512 = -0.923880 
// W0225JD512 = -0.928506 
// W0226_0512 = -0.932993 
// W0228_0512 = -0.941544 
// W0230_0512 = -0.949528 
// W0231_0512 = -0.953306 
// W0232_0512 = -0.956940 
// W0234_0512 = -0.963776 
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-0.956940 

-0.953306 

-0.949528 

-0.941544 

-0.932993 

-0.928506 

-0.923880 

-0.914210 

-0.903989 

-0.898674 

-0.893224 

-0.881921 

-0.870087 

-0.863973 

-0.857729 

-0.844854 

-0.831470 

-0.824589 

-0.817585 

-0.803208 

-0.788346 

-0.780737 

-0.773010 

-0.757209 

-0.740951 

-0.732654 

-0.724247 

-0.707107 

-0.689541 

-0.680601 

-0.671559 

-0.653173 

-0.634393 

-0.624859 

-0.615232 

-0.595699 

-0.575808 

-0.565732 

-0.555570 

-0.534998 

-0.514103 

-0.503538 

-0.492898 

-0.471397 

-0.449611 

-0.438616 

-0.427555 

-0.405241 

-0.382683 

-0.371317 

-0.359895 

-0.336890 

-0.313682 

-0.302006 

-0.290285 

-0.266713 
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1000001111 
1000001110 
1000001100 
1000001010 
5 1000001000 
1000000111 
1000000110 
1000000100 
1000000010" 

10 1000000010 
1000000001" 
1000000001" 
1000000000 
1000000000 

15 1000000000 
1000000001 
1000000010 
1000000101 
1000001000 

20 1000001011 
1000001111 
1000010100" 
1000011010 
1000100000" 

25 1000100111" 
1000101111" 
1000110111" 
1000111111" 
1001001001" 

30 1001010011" 
100101 1 101" 
1001101001" 
1001110100" 
1010000000" 

35 1010001101^ 
1010011010_ 
1010101000_ 
10101 101 10_ 
1011000101, 

40 1011010100 
1011100100" 
1011110011_ 
11 00000 100_ 
1 10001 0100_ 

45 1100100101_ 
1100110110_ 
1101001000_ 
1101011001_ 
1 10110101 1_ 

50 1101111110_ 
1110010000_ 
1110100010_ 
1110110101_ 
1111001000_ 

55 1111011010_ 
1111101101 



_1 110000100 
_1110001010 
_1 110010000 
J110011100 
_1110101000 
_1 110101 111 
,1110110101 
,1111000001 
,1111001110 
,1111010100 
1111011010 
"1111100111 
"1111110011 
"1111111010 
0000001101 
0000011111 
0000110010 
"0001000101 
0001011000 
0001101010 
0001111100 
0010001111 
"0010100001 
"0010110010 
"0011000100 
"0011010101 
"0011100110 
0011110111 
"0100000111 
"0100010111 
"0100100111 
'0100110110 
0101000101 
"0101010011 
0101100001 
0101101110 
0101111011 
0110001000 
0110010100 
'0110011111 
0110101010 
0110110100 
0110111101 
0111000110 
0111001111 
0111010111 
0111011110 
0111100100 
0111101010 
0111101111 
0111110100 
0111110111 
0111111010 
0111111101 
0111111111 
0111111111 



// W0236 
// W0237 
// W0238 
// W0240 
// W0242 
// W0243 
// W0244 
// W0246' 
// W0248' 
// W0249' 
// W0250' 
// W0252' 
// W0254' 
// W0255" 
// W0258' 
// W0261" 
// W0264' 
// W0267' 
// W0270" 
// W0273" 
// W0276" 
// W0279" 
// W0282" 
// W0285" 
// W0288" 
// W0291" 
// W0294" 
// W0297" 
// W0300" 
// W0303" 
// W0306" 
// W0309" 
// W0312" 
// W0315" 
//W0318" 
//W0321 
// W0324" 
// W0327, 
// W0330, 
// W0333, 
// W0336, 
// W0339, 
// W0342, 
// W0345, 
// W0348, 
//W0351, 
// W0354_ 
// W0357_ 
// W0360_ 
// W0363_ 
// W0366_ 
// W0369 
// W0372_ 
// W0375_ 
// W0378_ 
// W0381 



_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
_0512 
,0512 
_0512 
,0512 
,0512 
,0512 
0512 = 
"0512 
"0512 : 
10512 : 
0512 : 
,0512 = 
0512 = 
0512 : 
0512 : 
"0512 : 
"0512 = 

"0512 = 

0512 = 
"0512 = 
0512 = 
0512 = 
"0512 = 
0512 = 
0512 = 
"0512 = 
0512 = 
"0512 = 
0512 = 
"0512 = 
0512 = 
"0512 = 
"0512 = 
"0512 = 
0512 = 
0512 = 
0512 = 
0512 = 
0512 = 
0512 = 
0512 = 
0512 = 
0512 = 
0512 = 
0512 = 



= -0.970031 
= -0.972940 
= -0.975702 
= -0.980785 
= -0.985278 
= -0.987301 
= -0.989177 
= -0.992480 
= -0.995185 
= -0.996313 
- -0.997290 
= -0.998795 
= -0.999699 
= -0.999925 
= -0.999699 
= -0.998118 
= -0.995185 
= -0.990903 
= -0.985278 
= -0.978317 
= -0.970031 
= -0.960431 

■ -0.949528 
= -0.937339 
■■ -0.923880 

■ -0.909168 
= -0.893224 
■■ -0.876070 
= -0.857729 
: -0.838225 
' -0.817585 

-0.795837 

-0.773010 

-0.749136 

-0.724247 

-0.698376 

-0.671559 

-0.643832 

-0.615232 

-0.585798 

-0.555570 

-0.524590 

-0.492898 

-0.460539 

-0.427555 

-0.393992 

-0.359895 

-0.325310 

-0.290285 

-0.254866 

-0.219101 

-0.183040 

-0.146730 

-0.110222 

-0.073565 

-0.036807 



-0.242980 

-0.231058 

-0.219101 

-0.195090 

-0.170962 

-0.158858 

-0.146730 

-0.122411 

-0.098017 

-0.085797 

-0.073565 

-0.049068 

-0.024541 

-0.012272 

+0.024541 

+0.061321 

+0.098017 

+0.134581 

+0.170962 

+0.207111 

+0.242980 

+0.278520 

+0.313682 

+0.348419 

+0.382683 

+0.416430 

+0.449611 

+0.482184 

+0.514103 

+0.545325 

+0.575808 

+0.605511 

+0.634393 

+0.662416 

+0.689541 

+0.715731 

+0.740951 

+0.765167 

+0.788346 

+0.810457 

+0.831470 

+0.851355 

+0.870087 

+0.887640 

+0.903989 

+0.919114 

+0.932993 

+0.945607. 

+0.956940 

+0.966976 

+0.975702 

+0.983105 

+0.989177 

+0.993907 

+0.997290 

+0.999322 
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Listing 18 

TFOLDBEGINS 0 0 "Copyright"*/ 
r „ 

Copyright (c) Pioneer Digital Design Centre Limited 

NAME: pilloc_rtl.v 
PURPOSE: Pilot location 
CREATED: June 1997 BY: T. Foxcroft 
15 MODIFIED: 

USED IN PROJECTS: cofdm only. 

20 /*FOLDENDS7 

TFOLDBEGINS 0 0 "Defines"*/ 
define FFTSIZE 2048 
define DATABINS 1705 
define SCATNUM 45 
25 "define SCALEFACTOR64Q 3792 //3x8192/sqrt(42) 
'define SCALE FACTOR 16Q 3886 //3x8192/sqrt(10)*2 
define SCALEFACTORQPS 2172 //3x8192/sqrt(2)*8 
'define AVERAGESF 12'hc49 //0.04x4096x32768/1705 = 3145 
/*F0LDENDS7 

30 module chanest (elk, resync, in_valid, in_data, constellation, 

u_symbol, us_pilots, uc_pilots, ct_pilots, out_tps, tps_valid, 
uncorrected_iq, 

out_valid, outi, outq, c_symbol, incfreq, wrstrb, ramindata, 
ramoutdata, ramaddr); 
35 TFOLDBEGINS 0 0 "i/o"*/ 

input elk, resync, in_valid; 

input [23:0] in_data; 

input [1 :0] constellation; 

output u_symbol; 
40 output us_pilots, uc_pilots, ct_pilots; 

output out_tps, tps_valid; 

output [23:0] uncorrected_iq; 

output out_valid; 

output [7:0] outi; 
45 output [7:0] outq; 

output c_symbol; 

output incfreq; 

output wrstfb; ... 
output [23:0] ramindata; 
50 input [23:0] ramoutdata; 
output [10:0] ramaddr; 

/*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "TPS location "*/ 
55 reg [10:0] tpsloc; 
reg [4:0] tpscount; 
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always @(tpscount) 
begin 

case(tpscount) 





5*b00000: 


tpsloc 




34 


5 


5*b00001: 


tpsloc 


— 


50; 




5'b00010: 


tpsloc 


- 


209; 




5'bOOOH: 


tpsloc 




346; 




5'b00100: 


tpsloc 


= 


413; 




5'b00101: 


tpsloc 


= 


569; 


10 


5'bOOHO: 


tpsloc 




595; 




5'b00111: 


tpsloc 




688; 




5'bOIOOO: 


tpsloc 




790; 




5'b01001: 


tpsloc 




901; 




5'b01010: 


tpsloc 




1073 


15 


5'b01011: 


tpsloc 




1219 




5'bOHOO: 


tpsloc 




1262 




5'b01101: 


tpsloc 




1286 




5'bOIHO: 


tpsloc 




1469 




5'b01111: 


tpsloc 




1594 


20 


default: tpsloc = 


1687; 




endcase 










end 










TFOLDENDSV 







TFOLDBEGINS 0 0 "continuous pilot location"*/ 
25 reg [10:0] contloc; 

reg [5:0] contloccount; 
always @(contloccount) 
begin 

case(contloccount) 



30 


6'b000000: 


contloc 




0; 




6'b000001: 


contloc 




48; 




6'b000010: 


contloc 




54; 




6'b000011: 


contloc 




87; 




6'b000100: 


contloc 




141 


35 


6'b000101: 


contloc 




156 




6'b000110: 


contloc 




192 




6'b000111: 


contloc 




201 




6'b001000: 


contloc 




255 




6'b001001: 


contloc 




279 


40 


6'b001010: 


contloc 




282 




6'b001011: 


contloc 




333 




6'bOOHOO: 


contloc 




432 




6'b001101: 


contloc 




450 




6'b001110: 


contloc' 




483 


45 


6'b001111: 


contloc 




525 




6'b010000: 


contloc 




531 




6'b0 10001: 


contloc 




618 




6'b0 10010: 


contloc 




636 




6'b010011: 


contloc 




714 


50 


6'b010100: 


contloc 




759 




6'b010101: 


contloc 




765 




6'b010110: 


contloc 




780 




6'b010111: 


contloc 




804 




6'bOHOOO: 


contloc 




873 


55 


6'b011001: 


contloc 




888 




6'b011010: 


contloc 




918 
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10 



15 



20 



25 



30 



35 



40 



45 



50 



55 
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1 140 

I 1 *tw 


6'b100101: 


contloc 




1146 


6'b100110: 


contloc 




1206 


6'b100111: 


contloc 




1269 


6'b101000: 


contloc 




1323 


6'b101001: 


contloc 




1377 


6'b101010: 


contloc 




1491 


6'b101011: 


contloc 




1683 


default: contloc = 1704; 


endcase 








end 








/•FOLDENDS7 







TFOLDBEGINS 0 0 "continuous pilot location"*/ 

/*reg [10:0] contloc [44:0]; 

reg [5:0] contloccount; 

initial 

begin 

contloc[0] = 0; contloc[1]= 48; contloc[2] = 54; 



contloc[5] = 
279; 



156; contloc[6] =192; contloc[7] = 

contloc[11] = 333; contloc[12] = 432 



contloc[3]= 87; contloc[4] = 141; 
201 ; contloc[8] = 255; contloc[9] = 



contloc[16] = 531; contloc[17] = 618 
contloc[21] = 765; contloc[22] = 780 
= 918; contloc[27] = 939 



contloc[26] 

contloc[31] = 1050; contloc[32] = 1101; contloc[33] = 1107 

contloc[36] = 1140; contloc[37] = 1146; contloc[38] = 1206 

contloc[41] = 1377; contloc[42] = 1491; contloc[43] = 1683 



contloc[10] = 282; 
contloc[14] = 483; 
contloc[15] = 525; 
contloc[19]= 714; 
contloc[20] = 759; 
contloc[24] = 873; 
contloc[25] = 888; 
contloc[29] = 969; 
contloc[30] = 984; 
contloc[34] =1110; 
contloc[35] = 1137; 
contloc[39] = 1269; 
contloc[40] = 1323; 
contloc[44] = 1704; 
end V 

TFOLDENDS7 

TFOLDBEGINS 0 0 "Control vars"*/ 
reg [1:0] constell; 
reg resynch; 

reg valid, Valid0,valid1,valid2,valid3,valid4,valid5,valid6,valid7,valid8; 

reg [1:0] whichsymbol; 

reg [1:0] pwhichsymbol; 

reg incwhichsymbol; 

reg [23:0] fftdata; 

reg [10:0] fftcount; 

reg [10:0] tapcount; 

reg [3:0] count12; 



contloc[13] = 450 



contloc[18] = 636 
contloc[23] = 804 
contloc[28] = 942 
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reg [3:0] dcount12; 
reg ramdatavalid; 
reg tapinit; 
reg tapinit1,tapinit2; 
5 reg [7:0] nscat; 
reg pilot; 

reg tapload; //controls when the taps are loaded 
reg tapload2; 
reg shiftinnewtap; 
10 reg filtgo; 

/*FOLDENDS*/ 

/TOLDBEGINS 0 0 "Channel Est vars H 7 

reg [11:0] tapi [5:0]; 

reg [11:0] tapq [5:0]; 
15 reg [27:0] sumi; 

reg [27:0] sumq; 

reg [1 1:0] chani; 

reg [1 1:0] chanq; 

wire [27:0] chani_; 
20 wire [27:0] chanq_; 

reg [11:0] idata; 

reg [1 1:0] qdata; 

/*F0LDENDS7 

/*FOLDBEGINS 0 0 "RAM vars"7 
25 reg [10:0] ramaddr; 

reg [10:0] pilotaddr; 

wire [10:0] ramaddr_; 

wire [10:0] ramaddrrev_; 

reg [23:0] ramindata; 
30 wire [23:0] ramoutdata; 

reg [23:0] ramout; 

reg [23:0] ramot; 

reg wrstrb; 

reg rwtoggle; 
35 reg framedata, framedataO; 

reg frav, firstfrav; 

reg [23:0] avchannel; 

reg [1 1:0] avchan; 

reg avlow; 
40 wire [23:0] avchan_; 

TF0LDENDS7 

/*FOLDBEGINS 0 0 "Channel calc vars"7 
reg chan_val; 

reg chan_valO,chan_vaM ,chan_val2,chan_vaI3,chan_val4.out valid* 
45 reg [23:0] sum; 

reg [1 1:0] sumsq; 

reg [1 1 :0] sumsqtemp; 
• reg [1 1:0] topreal; 

reg [1 1:0] topimag; 
50 reg [7:0] outi; 

reg [7:0] outitemp; 

reg [5:0] outitem; 

reg [7:0] outq; 

reg [10:0] prbs; 
55 //integer intsumi, intsumq,intsumsq.intouti intoutq' 

TFOLDENDSV 
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TFOLDBEGINS 0 0 "uncorrected pilot vars"*/ 
reg u_symbol; 
reg us_pilots; 
reg uc_pilots; 
5 reg [23:0] uncorrectedjq; 
reg [2:0] tps_pilots; 
reg [5:0] tpsmajcount; 
wire [5:0] tpsmajcount_; 
reg ct_pilots; 
10 reg out_tps, tps_valid; 
reg [1:0] pilotdata; 
/*FOLDENDS7 

TFOLDBEGINS 0 0 "pilot locate vars"*/ 

wire [1:0] which_symbol; 
15 wire [10:0] cpoffset; 

wire [10:0] pilotramaddr_; 

wire [23:0] pilotramin_; 

wire pilotwrstrb_; 

wire found_pilots; 
20 reg pilottocated; 

TFOLDENDSV 

/*FOLDBEGINS 0 0 "sync function arrays"*/ 
reg [1 1:0] syncO; 
25 reg [11:0] synd; 
reg [1 1:0] sync2; 
reg [3:0] syncoffset; 

always @(dcount12 or validl or valid2) 
begin 

30 if (validl | i valid2) 

syncoffset = 4'hc-dcount12; 
else 

syncoffset = dcount12; 
/*FOLDBEGINS0 2""7 
35 case(syncoffset) 
4'h1: 
begin 

syncO = 4046; synd = 272; sync2 = 95; 
end 

40 4'h2: 
begin 

syncO = 3899; synd = 476; sync2 = 168; 

end 

4'h3: 

45 begin 

syncO = 3661; synd = 614; sync2 = 217; 

end 

4'h4: 

begin 

50 syncO = 3344; synd = 687; sync2 = 243; 

end 
4'h5: 
begin 

syncO = 2963; synd = 701; sync2 = 248; 
55 end - 

4 f h6: 
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10 
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20 



25 



30 



35 



begin 

syncO = 2534; synd = 665; sync2 = 234; 

end 

4'h7: 

begin 

syncO = 2076; synd = 590; sync2 = 205; 

end 

4'h8: 

begin 

syncO = 1609; synd = 486; sync2 = 167; 

end 

4'h9: 

begin 

syncO =1152; synd = 364; sync2 = 123; 

end 

4'ha: 

begin 

syncO = 722; synd = 237; sync2 = 78; 

end 

default 

begin 

syncO = 334; synd = 113; sync2 = 36; 
end 

endcase 
TFOLDENDS*/ 

end 

/*FOLDENDSV 
always @(posedge elk) 
begin 

/*FOLDBEGINS 0 2 "Control "*/ 
constell <= constellation; 
resynch <= resync; 
if(resynch) 
begin 

TFOLDBEGINS 0 2 ""*/ 





valid 


<= 1'bO; 




validO 


<= 1'bO; 




valid 1 


<= 1"b0; 


40 


valid2 


<= 1'bO; 




valid3 


<= 1'bO; 




valid4 


<= 1'bO; 




valid5 


<= 1'bO; 




valid6 


<= 1'bO; 


45 


valid7 


<= 1'bO; 




valid8 


<= TbO; 



fftcount <=11'b0; 

ramdatavatid <= 1'bO; 

chan_val <= VbO; 
50 tapinit <= 1'bO; 

tapinitl <= 1'bO; 

tapinit2 <= 1'bO; 
. rwtoggle <= 1*b0; 

TFOLDENDS*/ 
55 end 
else 
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begin 

/*FOLDBEGlNS 0 2 ""*/ 
valid <= in_valid; 
validO <= valid&&pilotlocated; 
valid 1 <= validO; 
valid2 <= validl; 
valid3 <= valid2; 
valid4 <= vaiid3; 
validS <= valid4; 
valid6 <= validS; 
valid7 <= valid6; 
valid8 <= valid7; 
if(valid2) 

fftcount <= fftcount + 1'b1; 

chan_val <= valid4&&filtgo&&framedata; 

incwhichsymbol <= valid 1&&(fftcount == (TFTSIZE-1)); 

if(incwhichsymbol) 

begin 

rwtoggle <= Irwtoggle; 
tapinit <= I'bl; 
ramdatavalid <= 1'b1; 
end 

else if(valid6) 
tapinit <= 1'b0; 



tapinitl <= tapinit; 
tapinit2 <= tapinitl; 
/*FOLDENDS*/ 
end 

fftdata <= in_data; 

TFOLDBEGINS 0 0 "frame averager"*/ 

if(resynch) 

begin 

frav <= 1'bO; 

firstfrav <= 1'bO; 
end 
else 
begin 

if(chan_val&&framedata) 
frav <= 1'b1; 

else if(!framedata&&framedataO) 
frav<=VbO; 

if(chan_val&&framedata&&!frav) 
firstfrav <= 1'b1; 
else if(chan_val) 
firstfrav '«= 1 l b0; 

/*FOLDBEGINS 0 2 "calculate 0.2 x mean channel amplitude"*/ 

if(chan_valO) 

begin . 

if (firstfrav) 

begin 

avchannel <= avmult(sumsqtemp); 
avchari' <= avchan_[1 1:0]; 
end 
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else 



10 



15 



20 



25 



30 



35 



40 



45 



avchannel <= avmult(sumsqtemp) + avchannel; 
end 

TFOLDENDSV 
if(chan_val1) 
avlow <= (sumsqtemp<avchan)? 1:0; 

end 

/*FOLDENDS*/ 

if(resynch) 

begin 

framedata <= 1'b0; 

framedataO <= 1'b0; 
tapload <= VbO; 



framedataO <= framedata; 
if(incwhichsymbol&&(cpoffset==0)) 
framedata <= 1; 

else if(ramdatavalid&&valid2&&(fftcount == (cpoffset - 1))) 
framedata <= 1 ; 

else if(valid2&&(fftcount == (cpoffset + 'DATABINS))) 
framedata <= 0; 
tapload <= framedata; 

end 

filtgo <= ramdatavalid&&( valid2? tapload : filtgo); 
tapload2 <= valid&&tapload&&(count1 2== 1 1 )&&(fftcount!=0); 
pilot <= (count12==0); 
dcount12 <= count12; 

shiftinnewtap <= !((nscat == 139)| |(nscat == 140) | |(nscat == 141)); 

if(incwhichsymbol) 
begin 

if(!ramdatavalid) 

begin 

whichsymbol <= pwhichsymbol; 

tapcount <= pwhichsymbor2'b1 1 + cpoffset; 
end 
else 
begin 

whichsymbol <= whichsymbol + 1'b1 ; 

tapcount <= {whichsymbolIirwhichsymbolfOlJwhichsymboltOJJ^'bl 1 + 

cpoffset; 
end 
end 

else ' ' 

if(framedata) 

begin 

if (fftcou nt==cpoffset) 
begin 

/*FOLDBEGINS 0 4 "set up the counters 1 '*/ 
//count12 <= ((4-whichsymbol)&4 , b0011)*3; 

count12 <= {whichsymbol[1] A whichsymbol[6],whichsymbol[0]}*2'b11; 
' if(validO) 
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nscat <= 8'bO; 
TFOLDENDS*/ 

end 

else 
5 begin 

TFOLDBEGINS 0 4 ,m V 

if(valid) 

begin 

count12 <= (count12==11)? 4'bO : count12 + 1'b1; 
10 tapcount <= tapcount + 1*b1; 

if(count12==11) 

nscat <= nscat + 1'b1; 
end 

15 TFOLDENDS7 
end 

end 
else 
begin 

20 if(tapinit2&&valid5) 
nscat <= 8'bO; 
if(tapinit) 
begin 

if(valid3jlvalid4| Ivalid5&&(whichsymbol==2'b0)) 
25 tapcount <= tapcount + 4'hc; 

else 

if(valid6) 

tapcount <= tapcount + 
{whichsymbol[1] A whichsymbol[0],whichsymbol[0]}*2'b11 + 1'b1; 
30 end 
end 

/*FOLDENDS7 
/*FOLDBEGINS 0 2 "Channel Estimation"*/ 
if(tapinit2) 
35 begin 

/*FOLDBEGINS 0 4 "Read in first 3 or 4 taps"*/ 
if(valid5) 

prbs <= alpha12(alpha(whichsymbol)); 
else 

40 if(valid6| |valid7| |(valid8&&(whichsymbol==2'b0))) 

prbs <= alpha12(prbs); 
if(valid5) 
begin 

tapi[0] <= pseudo(ramout[23:12] ( rb1); 
45 tapi[1] <= pseudo(ramout[23:12] ( rb1); 

tapi[2] <= pseudo(ramout[23:12],rb1); 
tapt[3] <= pseudo(ramout[23: 1 2], 1 'b1 ); 
* tapq[0] <= pseudo(ramout[11:0], 1'bT); 
tapq[1] <- pseudo^ramoutflliO], 1'b1); 
50 tapq[2] <= pseudo(ramout[1 1 :0], 1 'b1 ); 

tapq[3] <= pseudo(ramout[1 1:0], 1 f b1 ); 
end 

else if( !((whichsymbol!=2 , b0)&&valid8)) 
begin 

55 tapi[5] <= tapi[4]; ' 

tapi[4] <= tapi[3]; 
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tapi[3] <= tapi[2]; 
tapi[2] <= tapi[1]; 
tapi[1] <= tapi[0j; 

tapi[0] <= pseudo(ramout[23:12],prbs[0]); 
5 tapq[5] <= tapq[4]; 

tapq[4] <= tapq[3]; 
tapq[3] <= tapq[2]; 
tapq[2] <=tapq[1]; 
tapq[1] <=tapq[0]; 
1 0 tapq[0] <= pseudo(ramout[1 1 :0],prbs[0]); 

end 

/*FOLDENDS*/ 
end 

1 5 else if(framedata) 

begin 

TFOLDBEGINS 0 4 "update taps in normal op "*/ 

if(tapload2) 

begin 

20 prbs <= alpha12(prbs); 

tapi[5] <= tapi[4] 
tapi[4] <= tapi[3 
tapi[3] <= tapi[2 
tapi[2] <= tapi[1 
25 tapi[1] <= tapi[0; 

if(shiftinnewtap) 

tapi[0] <= pseudo(ramout[23:12],prbs[0]); 
tapq[5] <= tapq[4]; 
tapq[4] <= tapq[3]; 
30 tapq[3] <= tapq[2]; 

tapq[2] <= tapq[1]; 
tapq[1] <=tapq[0]; 
if(shiftinnewtap) 

tapq[0] <= pseudo(ramout[11:0],prbs[0]); 
35 end 

TFOLDENDS7 
TFOLDBEGINS 0 4 "Channel interpolate"*/ 
if(pilot) 
begin 

40 if(valid4) 
begin 

chani <= tapi[3]; 

chanq <= tapq[3]; 
end 

45 if(valid3) 
begin 

idata <= ramot[23:12]; 
qdata <= ramot[1 1:0]; 
end 

50 end 
else 
begin 
if(valid1) 
begin 

55 sumi <= mult(tapi[0],sync2) - mult(tapi[1].sync1); 

sumq <= mult(tapq[0],sync2); 
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end 

else if(valid2) 
begin 

sumi <= sumi + mult(tapi[2] f sync0); 
5 sumq <= sumq + mult(tapq[2],sync0) - mult(tapq[1],sync1); 

end 

else if(valid3) 
begin 

10 sumi <= sumi + mult(tapi[3],sync0) - mult(tapi[4],synd); 

sumq <= sumq + mult(tapq[3],sync0) + 12'h800; //2048 for final round- 
ing 

idata <= ramot[23:12]; 
qdata <= ramot[11:0]; 
15 end 

else if(valid4) 
begin 

chani <= chani_[23:12]; 
chanq <= chanq_[23:12]; 
20 end 
end 

//intsumi = (chani[1 1])? {20'hfffff,chani[1 1 :0]}:chani; 

//intsumq = (chanq[11])? {20 , hfffff,chanq[11:0]}:chanq; 

//if(chan_val) $display(intsumi*intsumi+intsumq*intsumq)- 
25 /*FOLDENDS*/ 
end 
end 

assign chani_ = sumi + mult(tapi[5],sync2) + 12*h800; 

assign chanq_ = sumq + mult(tapq[5],sync2) - mu!t{tapq[4],sync1); 
30 assign avchan_ = avchannel + 24'h000800 

TFOLDENDSV 
TFOLDBEGINS 0 2 "Calculate channel"*/ 
always @(posedge elk) 
begin 

35 if(resynch) 
begin 

chan_vaI0 <= 1*b0; 

chan_va!1 <= VbO 

chan_val2 <= 1'b0 
40 chan_val3 <= 1'b0 

chan_val4 <= 1'b0 

out_valid <= TbO; 
end 
else 

45 begin 

chan_val0 <= chan_val; 

chan_val1 <= chan_val0 

chan_yaI2 <= chan_val1 

chan_vaI3 <= chan_val2 
50 chan_val4 <= chan_val3 

//out_valid <= chan_val4. 

out_valid <= chan_val4&&ramdatavalid&&!pilotdata[1]; 
end 

if(chan_val) 
55 sumsqtemp <= sum[22:1 1]; 

if(chan_val0) 
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topreal <= sum[23:12]; 
if(chan_val1) 
topimag <= sum[23:12]; 
if(chan_val2) 
5 sumsq <= sum[23:12]; 

if(chan_val3) 
begin 

outitemp <= divider(topreal,sumsq,(consteII==0)); 
10 outitem <= divplussoft(topreal,sumsq,consteil); 

end 

if(chan_val4) 
begin 

outq <= divider(topimag t sumsq 1 (constell==0)); 
15 outi <= outitemp; 

end 

//intouti = (outi[7])? {24'hffffff,outi[7:0]}:outi; 
//intoutq = (outq[7])? {24'hffffff,outq[7:0]}:outq; 
//if(chan_val&&ramdatavalid) $display(intsumi); 
20 //if(chan_val4&&ramdatavalid) $displayb(outitemp 1f outitem); 

end 

always @(chan_val or chan_val0 or chan_val1 or chani or chanq or constell 
or idata or qdata or sumsqtemp) 
begin 

25 if(chan_val) 

sum = smult(chani,chani,1) + smult(chanq,chanq,1) + 24'h000400; 
else if(chan_valO) 

sum = smult(idata,chani,1) + smult(qdata,chanq,1) + 24'h000800; 
else if(chan_va!1) 

30 sum = smult(qdata,chani,1) - smult(idata t chanq,1) + 24'h000800; 

else //chan_val2 
begin 

case(constell) 

2'b00: 

35 sum = smult(sumsqtemp/SCALEFACTORQPS,0) + 24'h000800* 

2'b01: 

sum = smult(sumsqtemp,'SCALEFACTOR16Q,0) + 24'h000800; 
default: 

sum = smult(sumsqtemp/SCALEFACTOR64Q,0) + 24'h000800; 
40 endcase 
end 
end 

TFOLDENDSV 

/*FOLDBEGINS 0 2 "Extract Continual and scattered pilots for Freq + Sampling Error 
45 . Block"*/ 

always @(posedge elk) 
begin 

if(resynch> 
contloccount <= 6'b0; 
50 else 

if(ramdatavalid&&valid2&&(pilotaddr==contloc)) 

contloccount <= (contloccount == 44)? 6'b0 : contloccount + 1'b1; 
if(ramdatavalid&&valid2&&((pilotaddr==contloc) | i pilot)) 
uncorrectedjq <= ramot; 
55 uc_pilots <= 

ramdatavalid&&framedata&&(pilotaddr==contloc)&&valid2&&!resynch; 
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us_pilots <= ramdatavalid&&framedata&&pilot&&valid2&&!resynch; 
u_symbol <= !resynch&&ramdatavalid&&(valid2? (pilotaddr==0) : u_symbol); 
//$display(pilotaddr t jamot[23:12] t( valid2,,contloccount,,uncorrected_iq[ 
23:12], t uncorrectedJq[1 1:0],,uc_pilots,,us_pilots); 

5 

end 

TFOLDENDS7 
TFOLDBEGINS 0 2 "Extract TPS pilots "*/ 
always @(posedge elk) 
10 begin 

if(resynch) 
begin 

tpscount <= 5'bO; 

tps_pilots <= 3'bO; 
15 tps_valid <= 1'b0; 

ct_pilots <= 1'bO; 
end 
else 
begin 

20 if(ramdatavalid&&valid2&&(pilotaddr==tpsloc)) 

tpscount <= (tpscount[4])? 5'b0 : tpscount + Tb1; 

tps_pilots[0] <= valid2? ramdatavalid&&framedata&&(pilotaddr==tpsloc) : 
tps_pilots[0]; 

tps_pilots[1] <= (chan_val? tps_pilots[0] : tps_pilots[1]); 
25 tps__pilots[2] <= tps_pilots[l]&&chan_val3; 

tps_valid <= (tpscount==0)&&tps_pilots[2]; 
ct_pilots <= tps_pilots[2]; 
end 

if(resynch) 
30 tpsmajcount <= 6'bO; 

else 
begin 

if(tps_pilots[2]) 
begin 

35 if(tpscount==0) 
begin 

tpsmajcount <= 6'bO; 
out_tps <= tpsmajcount_[5]; 

end 

40 else 

tpsmajcount <= tpsmajcount_; 
end 

end 

if(resynch) 
45 pilotdata <= 2'bO; 

else 
begin 
if(vaHd2) ■ • • 

pilotdata[0] <= ramdatavalid&&framedata&&( 
50 (pilotaddr==tpsloc)|| 

(pilotaddr==contloc)| | 
pilot 

); 

pilotdata[1] <= chan_val0? pilotdata[0] : pilotdata[1]; 
55 end 
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//$display(pilotaddr t Tamot[23:12], ( valid2 f ,contloccount 1( uncorrectedJq[2 
3:12],, uncorrected_iq[1 1:0], ,uc_pilots,,us_pilots); 

//$display(valid2„pilotdata[0], I pilotdata[1] tl pilotdata[2] tt ct_pilots ? .,, 
,,out_valid,,pilotaddr); 

5 end 

assign tpsmajcount_ = tps(topreal[1 1],tpscount,tpsmajcount); 
/*FOLDENDS7 

/*FOLDBEGINS 1 2 "pilot locate control "*/ 
10 always @(posedge elk) 
begin 

if(resynch) 

pilotlocated <= 1'b0; 

else 

1 5 if(found_pilots) 
begin 

pilotlocated <= Vb1; 

pwhichsymbol <= which_symbol + 2'b10; 
end 

20 end 

TFOLDENDSV 
/*FOLDBEGINS 0 2 "RAM"*/ 
always @(posedge elk) 
begin 

25 if(pilotlocated) 
begin 

wrstrb <= IvalidO; 
if(valid) 

ramindata <= fftdata; 
30 pilotaddr <= ramaddr_ - cpoffset; 

ramaddr <= rwtoggle? ramaddr_ : ramaddrrev_; 
if(valid5) ramot <= ramout; 

end 
else 

35 begin 

/*FOLDBEGINS0 4 m, V 

wrstrb <= pilotwrstrb_; 

ramindata <= pilotramin_; 

ramaddr <= pilotramaddr_; 
40 TFOLDENDSV 
end 

ramout <= ramoutdata; 
end 

assign ramaddr_ * (tapinit| ifram.edata&&(valid2&&(count12==1 1)))? tapcount ■ 
45 fftcount; 

assign ramaddrrev_ = • 

{ramaddrJO^amaddrJIJ.ramaddrJZljamaddrJSjjamadd^JjamaddrJS], 

ramaddrJ6]jamaddrJ7],ramaddrJ8],ramaddr [9], ramaddr [101V 
50 /'FOLDENDS7 " 

assign c_symbol = whichsymbol[0]; 

/*FOLDBEGINS 0 0 ""*/ 
always @(posedge elk) 
55 begin 
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//$display(chan_val,,framedata„frav I! firstfrav„„valid2,,valid4„out_valid 

..avchannel,,avchan l ,sumsqtemp,,,avlow,,chan_val1,,); 

//$display(tps_valid,.out_tps„tpscount,,tps_pilots[2]); 

//$dispiay(in_data„filtgo„valid4„tapload,„nscat„count12 l ,fftcount„incw 
5 hichsymbol,,, 

//tapcount,,ramaddr,,wrstrb,,rwtoggle 

If), 

//(resynch„valid„fftcount„ramaddr,,ramindata[23:12],,ramoutdata[23:12],,t 

apinit,,tapinit2, l tapcount,,ramout[23:12],, 
10 //tapi[0] M tapi[1],,tapi[2]„tapi[3]„tapi[4] ) ,tapi[5]); 

//$display(tapcount,,tapinit2, , valid4, , valid. ,valid2,,wrstrb„fftcount„fram 

edata„count12,,tapi[0],,tapi[1],,tapi[2],,tapi[3],,tapi[4] ) ,tapi[5]); 

//$display(, 1 „intouti,,intoutq„out_valid,„,valid4,,valid2,,chan_val„filt 

go,,framedata,,fftcount,,ramindata[23:12]); 
15 //if(whichsymbol==1) 

$display(tapinit, .tapcou nt, .fftcount, , ramindata[23: 1 2] , , , .tapcou nt, ,tapi[0] 

,,tapi[1]„tapi[2] ) ,tapi[3] M tapi[4],,tapi[5]„intsumi,,intsumq„idata„qda ta); 

//$display(framedata„pilotaddr„fftcount„tapcount„ramaddr,,ramout[23:12], 

,ramindata[23:12],,prbs,,us_pilots,.uc_pilots l ,ct_pilots,,out valid,, .contl occount,. 
20 //tps_pilots[0],,tps_pilots[1],,tps_pilots[2]); 
end 

/'FOLDENDS*/ 

pilloc pilloc (.clk(clk), .resync(resync), .in_valid(in_valid), .in_data(in_data), 
.found_pilots(found_pilots), .which_symbol(which_symbol), 
25 .cpoffset(cpoffset), .incfreq(incfreq) 

.ramaddr(pilotramaddr_) , .ramin(pilotramin_), .ramout(ramout), 
.wrstrb(pilotwrstrb)) ; 
/•FOLDBEGINS 0 2 "functions"*/ 
/*FOLDBEGINS 0 0 "tps demod "*/ 
30 function [5:0] tps; 
input tpssign; 
input [4:0] tpscount; 
input [5:0] tpsmajcount; 
reg tpsflip; 
35 begin 

case(tpscount) 

5'b00001 ,5'b0001 1 ,5'b001 00,5'b001 10,5'b0101 1 t 5'b01 110: 
tpsflip = 0; //added 1 since tpscount already incremented 
default: 
40 tpsflip = 1 ; 

endcase 

tps = (tpsflip A tpssign)? tpsmajcount - 1'b1 : tpsmajcount + 1'b1; 

end 

endfunction 
45 /*F0LDENDS7 

/*FOLDBEGINS 0 0 "pseudo function"*/ • 

.function [11:0] pseudo; • • 

input [11:0] data; 
50 input flip; 
begin 

pseudo = flip? -data + 1'b1 : data; 
end 

endfunction 
55 TFOLDENDS*/ 

/*FOLDBEGINS 0 0 "averager multiplier"*/ 
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function [11:0] avmult; 
input [11:0] i; 
reg [23:0] res; 
begin 

5 res = (r AVERAGESF) + 23'h000800; //multiply and round 

avmult = res[23:12]; 
end 

endfunction 

/*FOLDENDS*/ 
10 /*FOLDBEGINS 0 0 "filter tap multiplier"*/ 

function [27:0] mult; 

input [11:0] i; 

input [11:0] j; 

reg [23:0] res; 
15 reg [11:0] modi; 

reg [11:0] invi; 

begin 

invi = -i + 1'b1; 
modi = i[1 1]? invi : i; 
20 res = (modi*j); //multiply and round 

mult = i[11]? {4 f hf t -res} + 1'b1 : res; 

end 

endfunction 

TFOLDENDS*/ 
25 /*FOLDBEGINS 0 0 "signed multiplier"*/ 

function [23:0] smult; 

input [11:0] i; 

input [11:0] j; 

input signedj; 
30 reg [23:0] res; 

reg [11:0] modi; 

reg [1 1:0] modj; 

begin 

modi = i[11]?~i+ 1'b1 : i; 
35 modj = (][11]&&signedj)? + 1'b1 : j; 

res = (modi*modj); 

smult = (i[11] A (j[11]&&signedj))? -res + 1'b1 : res: 
end 

endfunction 
40 TFOLDENDS*/ 

/*FOLDBEGINS 0 0 "divider function 1 '*/ 

function [7:0] divider; 

input [1 1:0] dividend; 

input [1 1:0] divisor; 
45 input qpsk; 

reg [11:0] moddividend; 
reg signresult; 
reg [12:0] intval; 
50 reg [12:0] carry; 
reg [7:0] divide; 
reg [8:0] signeddivide; 
integer i; 
begin 

55 signresult = dividend[1 1]; 

moddividend = dividend[1 1]? -dividend + 1'b1 : dividend; 
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divide = 0; 

carry = qpsk? {1'bO,moddividend}:{moddividend,rbOV 
TFOLDBEGINS 0 2 ""*/ 
for(i=0;i<8;i=i+1) 
5 begin 

intval = carry - divisor; 
divide[7-i] = !intval[12]; 

carry = (intval[1 2])? {carry[1 1 ;0], 1 'b0} : {intval[1 1 :0], 1 'b0}; 
end 

10 TFOLDENDSV 

//signeddivide = signresult? -divide + 2'b10 : divide + 1'b1; 
signeddivide = signresult? {1'b1 -divide} + 2'b10 : {1'b0,divide} + 1'b1' 

//$dispiayb(signeddivide, T divide„signresult,,constellation tt ); 
divider = signeddivide[8:1]; 

15 end 

endfunction 

TFOLDENDS*/ 

TFOLDBEGINS 0 0 "divider function with soft decisions added"*/ 

function [5:0] divplussoft; 
20 input [11:0] dividend; 

input [1 1:0] divisor; 

input [1:0] constellation; 

reg [11:0] moddividend; 

reg signresult; 
25 reg [12:0] intval; 

reg [12:0] carry; 

reg [8:0] divide; 

reg [10:0] signeddivide; 

reg [1 1:0] fracdivide; 
30 integer i; 

begin 

signresult = dividend[1 1]; 

moddividend = dividend[1 1]? -dividend + 1'b1 : dividend; 
divide = 0; 

35 carry = (constellation==0)? {rb0.moddividend}:{moddividend 1'b0V 

/*FOLDBEGINS 0 2 ""*/ • /• - 

for(i=0;i<9;i=i+1) 
begin 

intval = carry - divisor; 
40 divide[8-i] = !intval[12]; 

carry = (intval(1 2])? {carry[1 1 :0], 1 'b0} : {intval[1 1 :0], 1 'b0}; 
end 

/*FOLDENDS*/ 

signeddivide = signresult? {2'b1 1 -divide} + 1'b1 : {2*b0, divide}; 

45 

//Sdisplayb(signeddivide,, divide, , signresult,, constellation* V 
/*FOLDBEGINS 0 2 "qpsk"7 
if(constellation==2 , b0) 
begin 

50 //$writeh( M signeddivide, , tt ); 

signeddivide = signeddivide + 8'h80; 
//$writeh(sig neddivide, , , ,) ; 
if(signeddivide[10]) 
fracdivide = 9'hO; 

55 else 

if(signeddivide[9]| isigneddivide[8]) 
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fracdivide = 12'h700; 

else 

begin 

fracdivide = signeddivide[7:0] + {signeddivide[7:0],rb0} + 
5 {signeddivide[7:0],2'b0}; m 

fracdivide = fracdivide + 8'h80; 
end 

divplussoft = {3'b0,fracdivide[10:8]}; 
end 

10 else 

TFOLDENDSV 
/*FOLDBEGINS 0 2 M 16qam"V 
if(constellation==2'b01 ) 
begin 

15 $writeh(, .signeddivide, ,„); 

signeddivide = signeddivide + 8'hcO; 
$writeh(, .signeddivide, „,); 
if(signeddivide[10]) 
begin 

20 signeddivide = 10'bO; 

fracdivide = 9'h0; 
end 
else 

if(signeddivide[9]| |(signeddivide[8:7]==2 , b1 1)) 
25 begin 

fracdivide = 12'h380; 
signeddivide = 10'h100; 
end 
else 

30 begin 

fracdivide = signeddivide[6:0] + {signeddivide[601 1'bO} + 
{signeddivide[6:0] t 2'b0}; in 
fracdivide = fracdivide + 8'h40; 
end 

35 divplussoft = {1'bO,signeddivide[8:7]Jracdivide[9:7]}; 

end 

/*FOLDENDS*/ 
/*FOLDBEGINS 0 2 "32qam"*/ 
else 
40 begin 

signeddivide = signeddivide + 8'heO; 

if(signeddivide[10]) 

begin 

45 signeddivide = 10'bO; 

fracdivide = 9'hO; 
end 

else . . 

if(signeddivide[9] 1 1 (signeddivide[8:6]==3'b 111)) 
50 begin 

signeddivide = 10'h180; 

fracdivide = 9*h1c0; 
end 
else 

55 begin . 
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fracdivide = signeddivide[5:0] + {signeddivide[5:0],1'b0} + 
{signeddivide[5:0],2'b0}; in 
fracdivide = fracdivide + 8'h20; 
end 

5 divplussoft = {signeddivide[8:6],fracdivide[8:6]}; 

end 

/*FOLDENDS*/ 
end 

endfunction 
10 TFOLDENDS7 

/*FOLDBEGINS 0 0 "PRBS alpha3/6/9/12 multiplier"*/ 
function [10:0] alpha; 
input [1:0] which_symbol; 
begin 

1 5 case(which_symbol) 
2'bO: 

alpha = 11'b11111111111; 
2'b01: 

alpha = 11'b0001 1111111; 
20 2'b10: 

alpha = 11'b00000011111; 
2'b11: 

alpha = 1 1 "b0000000001 1 ; 

endcase 
25 end 

endfunction 
/*FOLDENDS7 

/*FOLDBEGINS 0 0 "PRBS alpha12 multiplier"*/ 

function [10:0] alpha12; 
30 input [10:0] prbsin; 

reg [10:0] prbsO; 

reg [10:0] prbsl; 

reg [10:0] prbs2; 

reg [10:0] prbs3; 
35 reg [10:0] prbs4; 

reg [10:0] prbs5; 

reg [10:0] prbs6; 

reg [10:0] prbs7; 

reg [10:0] prbs8; 
40 reg [10:0] prbs9; 

reg [10:0] prbsl 0; 

begin 

prbsO = {prbsin[0] A prbsin[2],prbsin[10:1]}; 

45 prbsl = {prbs0[0] A prbs0[2] ,prbs0[10:1]}; 

prbs2 = {prbs1[0] A prbs1[2] ,prbs1[10:1]}; 

prbs3 = {prbs2[0] A prbs2[2] ,prbs2[10:1]}; 

prbs4 = {prbs3[0] A prbs3[2] ,prbs3[10:1]}; . 

prbs5 = {prbs4[0j A prbs4[2] ,prbs4[10:1]}; 
50 prbs6 ={prbs5[0] A prbs5[2] ,prbs5[10:1]}; 

prbs7 = {prbs6[0] A prbs6[2] ,prbs6[10:1]}; 

prbs8 = {prbs7[0] A prbs7[2] ,prbs7[10:1]}; 

prbs9 = {prbs8[0] A prbs8[2] ,prbs8[10:1]}; 

prbsl 0 = {Drbs9[0] A prbs9[2] ,prbs9[10:1]}- 
55 alpha12 = {prbsl 0[0] A prbsl 0[2],prbs10[1 0:1]}; 

end 
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endfunction 
TFOLDENDSV 
TFOLDENDS7 
endmodule 



Listing 19 

TFOLDBEGINS 0 0 "Copyright"*/ 
1Q r ********************* ************** ************ 

Copyright (c) Pioneer Digital Design Centre Limited 



15 



NAME: pilloc_rtl.v 
PURPOSE: Pilot location 

CREATED: June 1997 BY: J. Parker (C code) 

20 MODIFIED: BY: T. Foxcroft 

USED IN PROJECTS: cofdm only. 
**************************** ***********************, 

25 /*FOLDENDS7 

'define FFTSIZE 2048 
define SCATNUM 45 

module pilloc (elk, resync, in_valid, in_data t found_pilots, which_symbol, cpoffset, 
incfreq, 

30 ramaddr , ramin, ramout, wrstrb); 

TFOLDBEGINS 0 0 "i/o"*/ 

input elk, resync, in_valid; 

input [23:0] in_data; 

output found_pilots; 
35 output [1 :0] which_symbol; 

output [10:0] cpoffset; 

output incfreq; 

TFOLDENDSV 

40 TFOLDBEGINS 0 0 "ram i/o"*/ 

output [10:0] ramaddr; 

reg [10:0] ramaddr_; 

output [23:0] ramin; 

input [23:0] ramout; 
45 output wrstrb; 

reg [10:0] ramaddr; 

reg [23:0] ramin; 

reg wrstrb; 

TFOLDENDSV 
50 TFOLDBEGINS 0 0 "vars"V 

reg found_pilots; 

reg [1:0] which_symbol; 

reg [1 :0] which_symbolcount; 

reg [1:0] which_symbol_; 
55 reg [10:0] cpoffset; 

reg incfreq; 
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reg resynch; 

reg [3:0] valid; 
10 reg [23:0] fftdata; 

reg [10:0] fftcount; 

reg contcomplete; 

reg firstcontsearch; 

reg finishedsearch; 
15 reg [4:0] firstscatcomplete; 

reg [4:0] failedtolock; 

reg [2:0] spmax; 

reg [2:0] spmaxfirst; 

reg [10:0] pilot_offset; 
20 reg [1:0] splodzero; 

reg [10:0] splocO; 

reg [5:0] splod; 

reg [10:0] splocmaxcount; 

25 reg [3:0] spoffset; 

reg [19:0] sumscat [1 1:0]; 

reg [19:0] sumscatmax; 

reg [3:0] sumscatmaxnoO; 

reg [3:0] sumscatmaxnol; 
30 wire [1 9:0] sumscatl ; 

wire [19:0] sumscat3; 

wire [19:0] sumscat5; 

reg [11:0] sumscatfirst; 

reg [4:0] fftfmished; 
35 reg ramwritestop; //botch for development purposes 

wire [3:0] mod 1 2fftcount; 

TF0LDENDS7 

TFOLDBEGINS 0 0 "continuous pilot location"*/ 
reg [10:0] contloc; 
40 always @(sploc1) 
begin 

case(splod) 

6'b000000: contloc = 0; 

6'b000001: contloc = 48; 
45 6'b000010: contloc = 54; 

6'bOOOOH: contloc = 87; • 

6'b000100: contloc =141; 

6'b000101: contloc =156; 

6'b000110: contloc = 192; 
50 6'b0001 11: contloc = 201; 

6'b001000: contloc = 255; 

6'b001001: contloc = 279; 

6'b001010: contloc = 282; 

6'b001011: contloc = 333; 
55 6'b001 1 00: contloc = 432; 

6'b001101: contloc = 450; 



210 

reg found_pilot; 

reg [19:0] v; 

reg [19:0] sum; 

reg [3:0] splocoffset; 

wire [10:0] carrier_number; 

reg [10:0] continual_pilot_offset; 
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6'b001110: 


contloc 


= 


483 






6'bOOHH: 


contloc 


— 


525 






6'b010000: 


contloc 


= 


531 






6'b010001: 


contloc 


= 


618 




5 


6'b010010: 


contloc 


= 


636 






6'b010011: 


contloc 


= 


714 






6*b010100: 


contloc 


= 


759 






6'b010101: 


contloc 


= 


765 






6'b010110: 


contloc 


= 


780 




10 


6'b010111: 


contloc 


= 


804 






6'bOHOOO: 


contloc 


= 


873 






6'b011001: 


contloc 


— 


888 






6*b011010: 


contloc 




918 






6'b011011: 


contloc 


— 


939 




15 


6*b011100: 


contloc 


= 


942 






6*b011101: 


contloc 


= 


969 






6'b011 110: 


contloc 


= 


984 






6'b01 1111: 


contloc 


= 


1050; 




6'b100000: 


contloc 




1101; 


20 


6'b100001: 


contloc 




1107; 




6'b100010: 


contloc 


= 


1110; 




6'b10001 1: 


contloc 




1137; 




6'b100100: 


contloc 




1140; 




6'b100101: 


contloc 




1146; 


25 


6'b100110: 


contloc 




1206; 




6'b100111: 


contloc 




1269; 




6'b101000: 


contloc 




1323; 




6'b101001: 


contloc 




1377; 




6*b101010: 


contloc 




1491; 


30 


6'b101011: 


contloc 




1683; 



35 



40 



45 



50 



55 



default: contloc = 1704; 
endcase 
end 

/*FOLDENDS*/ 

always @(posedge elk) 
begin 

resynch <= resync; 

if(resynch) 

begin 

valid <= 4'b0; 

fftcount <= 11 'b0; 

firstscatcomplete <= 5'bO; 

sum <= 20'bO; 

splocO <= 11'bO; 

splbd <= 6'bO; 

contcomplete <= 1'b0; 

failedtolock <= 5'bO; 

spmax <= VbO; 

spmaxfirst <= 1'b0; 

ramwritestop <= 1'b0; 

found_pilots <= 1'b0; 

found_pilot <=rb0; 

firstcontsearch <= 1'b0; 

finishedsearch <= 1'b0; 

which_symbolcount <= 2'bO; 
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incfreq <= 1'bO; 
end 
else 
begin 

5 incfreq <= !failedtolock[1]&&failedtolock[0]&&fftfinished[4]; 

found_pilots <= !found_pilot&&finishedsearch; 
found_pi!ot <= finishedsearch; 
valid[0] <= in_valid; 
valid[1] <= valid[0]; 
10 valid[2] <= valid[1]; 

valid[3] <= valid[2]; 
fftdata <= in_data; 
if(valid[0]&&!finishedsearch) 
fftcount <= fftcount + 1'b1 ; 
15 //if(fftfmished[0]) 

// $display('Trame n ,, fftcount); 

//if(incfreq) 

// $display( n tweek"); 

20 TFOLDBEGINS 0 4 "locate continual pilots"*/ 

spmax[1] <= spmax[0]; 

spmax[2] <= spmax[1]; 

spmaxfirst[1] <= spmaxfirst[0]; 

spmaxfirst[2] <= spmaxfirst[1]; 
25 //if(fftfinished[3]) 

// $display(spoffset tl which_symbol); 

if(fftfinished[3]) 
begin 

30 failedtolock[1] <= failedtolockfO]; 

failedtolock[2] <= failedtolock[1]; 
failedtolock[3] <= failedtolock[2]; 
faiiedtolock[4] <= failedtolock[3]; 

35 if(failedtolock[0]) 
begin 

/*FOLDBEGINS 0 2 ,m V 
if(failedtolock[4]) 

failedtolockfO] <= 1'b0; 
40 firstscatcomplete <= 5'b0; 

ramwritestop <= 1'b0; 
firstcontsearch <= 1'b0; 
/*FOLDENDS*/ 
end 

45 else 
begin 

/*FOLDBEGINS 0 4 ""*/ 
firstscatcomplete[0] <= 1*b1; 
firstcontsearch <= !firstscatcomplete[0]; 
50 ramwritestop <= !ramwritestop| |fmishedsearch; 

contcomplete <= ramwritestop; 

if(!finishedsearch&&firstscatcomplete[0]&&ramwritestop) 
begin 

finishedsearch <= firstcontsearch? 1'b0 : 
55 (cpoffset==continual_pilot_offset); 

cpoffset <= continual_pilot_offset; 
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failedtoiock[0] <= !firstcontsearch&&(cpoffset!=continual_pilot_offset); 
end 

/*FOLDENDS7 
end 

5 end 
else 
begin 

firstscatcomplete[1] <= firstscatcomplete[0]&&!contcomplete; 
firstscatcomplete[2] <= firstscatcomplete[1]; 
1 0 if(firstscatcomplete[0]&&!finishedsearch&&!contcomplete&&!finish h 

&&(sploc1 ==44)&&{splocO==splocmaxcount)) 

contcomplete <= 1 'b 1 ; 

end 

if(found_pilots) 

15 $display(which_symbol,,cpoffset ( ,spoffset); 

//$display(sum„contcomplete,jamwritesto^^ 
cO M spiocmaxcount 1t v )t)l)( fftf!nished[3] (f finishedsearch); 

//Sdisplay(fftcount, ,firstscatcomplete[0] It ramwritestop t) spoffset M sumsca 
tmaxno1 ))t ,finishedsearch,,found_pilots t , 
20 //„„.,„ 

//pilot_offset ( ,which_symbol lll ,cpoffset, ) failedtolock ); 
sploc1zero[0] <= (splod == 0); 
sploc1zero[1] <= splod zero[0]; 

25 if(firstscatcomplete[0]&&!finishedsearch&&!contcomplete&&!finish 
begin 
if(sploc1==44) 

begin 

30 TFOLDBEGINS 0 4 ""7 

//$display(splocO,,splocmaxcount); 

pilot_offset <= splocO + splocoffset; 

which_symbol <= which_symbol_ - which_symbolcount; 

if(splocO==spiocmaxcount) 
35 begin 

splocO <= irbO; 
//contcomplete <= Vb1; 
which_symbolcount <= 2'b0; 
end 

40 else 
begin 

splocO <= splocO + 2'b1 1 ; 

which_symbolcount <= which_symbolcount + Tb1; 
end 

45 if(sploc0==0) 

spmaxfirst[0] <= 1'b1; 
splod <= 6'bO; 
spmax[0] <= 1'b1; 
TFOLDENDS7 

50 end 
else 
begin 

/*FOLDBEGINS 0 4 ""7 
splod <= splod + Tb1; 
55 spmax[0] <= 1'b0; 

spmaxfirst[0] <= 1'b0; 
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/*FOLDENDS*/ 
end 
end 

if(firstscatcomplete[2]) 
5 begin 

if(sploc1zero[1]) 

sum <= modulus(ramout[23:12],ramout[11:0]); 
else 

sum <= modulus(ramout[23:12],ramout[11:0]) + sum; 
10 end 

/*FOLDENDS*/ 
end 

TFOLDBEGINS 0 2 "search for largest continous pilot correlation"*/ 
if(spmax[2]) 
15 begin 

if(spmaxfirst[2]) 
begin 

v <= sum; 

continual_pilot_offset <= pilot_offset; 
20 end 
else 
begin 

if(sum>v) 

begin 

25 v <= sum; 

continual_pilot_offset <= pilot_offset; 

end 
end 

30 //$display(sum, I continuaLpilot_offset tt contcomplete )1 ramwhtestop,, which 

_symbol,,spoffset,,,splocO,, splocmaxcount,, v); 
//Sdispiay(sum); 

end 

/*FOLDENDS*/ 
35 end 

assign carrier_number = contloc + spiocO + splocoffset* 
/*FOLDBEGINS 0 0 "scattered pilot offset mod 3"*/ 
always @(spoffset) 
begin 

40 splocoffset = 2'bO; 

splocmaxcount = 342; 
which__symbol_ = 2'bO; 
case(spoffset) 

4'b0000,4'b001 1 ,4'b01 1 0,4'b1 001 : 
45 begin 

splocoffset = 2 ! b0; 
splocmaxcount = 342; 
end * . - - . 

4^0001,4^0100,4^0111,4^1010: 
50 begin 

splocoffset = 2'b01; 
splocmaxcount = 339; 
end 

//4'b001 0.4^0101,4^1000,4^1011: 
55 default: — % 

begin 
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splocoffset = 2'b10; 
splocmaxcount = 339; 
end 

endcase 
5 case(spoffset) 

4'b0000,4'b0001,4'b0010: 
which_symbol_ = 2*60; 
4 , b0011,4 , b0100 i 4 , b0101: 
which_symbol_ = 2'b01; 
10 4 , b0110,4 , b0111 I 4 , b1000: 
which_symboI_ - 2'b1 0; 
/M'blOOM'blOIO^'blOII: 
default: 

which_symbol_ = 2'b1 1 ; 
15 endcase 
end 

TFOLDENDSV 

TFOLDBEGINS 1 0 "Search for scattered pilots"*/ 
always @(posedge elk) 
20 begin 

if(resynch) 

sumscatfirst <= 12'hfff; 
else 

25 

begin 

if(valid[0]&&!finishedsearch) 
TFOLDBEGINS 1 2 "do the accumulations"*/ 
case(mod 1 2fftcount) 
30 4'h0: 
begin 

sumscat[0] <= (sumscatfirst[0])? modulus(fftdata[23:12],fftdata[1 1:0]) : 
sumscat[0] + modulus(fftdata[23:12],fftdata[1 1:0]); 
sumscatfirst[0] <= 1'b0; 
35 end 

4*h1: 

begin 

sumscatp] <= (sumscatfirst[1])? modu1us(fftdata[23:12],fftdata[1 1:0]) : 
sumscat[1] + modulus(fftdata[23:12],fftdata[1 1:0]); 
40 sumscatfirst[1] <= 1'bO; 

end 

4*h2: 

begin 

sumscat[2] <= (sumscatfirst[2])? moduius(fftdata[23:12],fftdata[1 1:0]) : 
45 sumscat[2] + modulus(fftdata[23:12] ( fftdata[1 1:0]); 

sumscatfirst[2].<= 1'bO; • 
end 

4'h3: . . : . 
begin 

50 sumscat[3] <= (sumscatfirst[3])? modulus(fftdata[23:12],fftdata[1 1 0]) ■ 

sumscat[3] + modulus(fftdata[23:12] t fftdata[1 1:0]); 
sumscatfirst[3] <= 1'bO; 

end 

4'h4: 

55 begin 
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sumscat[4] <= (sumscatfirst[4])? modulus(fftdata[23:12],fftdata[11:0]) : 
sumscat[4] + modulus(fftdata[23:12],fftdata[1 1:0]); 
sumscatfirst[4] <= 1'b0; 
end 

5 4'h5: 
begin 

sumscat[5] <= (sumscatfirst[5])? modulus(fftdata[23:12],fftdata[1 1:01) : 

sumscat[5] + modulus(fftdata[23:12],fftdata[1 1:0]); 

sumscatfirst[5] <= 1'bO; 
10 end 
4'h6: 
begin 

sumscat[6] <= (sumscatfirst[6])? modulus(fftdata[23:12],fftdata[11:0l) : 

sumscat[6] + modulus(fftdata[23:12],fftdata[11:0]); 
15 sumscatfirst[6] <= 1'bO; 

end 
4'h7: 
begin 

sumscat[7] <= (sumscatfirst[7])? modulus(fftdata[23:12],fftdata[1 1 :01) • 
20 sumscat[7] + modulus(fftdata[23:12],fftdata[11:0]); 

sumscatfirst[7] <= 1'bO; 
end 
4'h8: 
begin 

25 

sumscat[8] <= (sumscatfirst[8])? modulus(fftdata[23:12],fftdata[11:0l) • 
sumscat[8] + modulus(fftdata[23:12],fftdata[11:0]); 
sumscatfirst[8] <= 1'bO; 
end 

30 4'h9: 
begin 

sumscat[9] <= (sumscatfirst[9])? modulus(fftdata[23:12],fftdata[1 1 :0]) • 

sumscat[9] + modulus(fftdata[23:12],fftdata[1 1:0]); 

sumscatfirst[9] <= 1'bO; 
35 end 
4'ha: 
begin 

sumscat[10] <= (sumscatfirst[10])? modulus(fftdata[23:12],fftdata[11:0]) 

sumscat[10] + modulus(fftdata[23:12],fftdata[1 1 01V 
40 sumscatfirst[10] <= 1'bO; 

end 
default: 
begin 

sumscat[11] <= (sumscatfirst[1 1])? modulus(fftdata[23:12],fftdata[1 1:0]) 
45 sumscat[11] + modulus(fftdata[23:12],fftdata[1 1:0]); 

sumscatfirst[1 1] <= 1'bO; • 
end 

endcase ' 
/*FOLDENDS7 
50 else if(fftfmished[0]) 

sumscatfirst <= 12'hfff; 

end 

TFOLDBEGINS 1 0 "Find offset"*/ 
if(resynch) 
55 fftfinished <= 5'bO; 

else 
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begin 

fftfinished[0] <= 
fftfinished[1] <= 
fftfinished[2] <= 
fftfinished[3] <= 
fftfinished[4] <= 
end 

if(!ramwritestop) 

begin 

if(fftfinished[0]) 
begin 

sumscatfO] 
sumscat[1] 
sumscat[2] 
sumscat[3] 
sumscat[4] 
sumscat[5] 
sumscat[6] 
sumscat[7] 
sumscat[8] 
sumscat[9] 
sumscat[10] 
sumscat[1 1] 



valid[0]&&!finishedsearch&&(fftcount==2047); 



fftfinished 
fftfinished 
fftfinished 
fftfinished 



0]; 
1]; 
2]; 
3]; 



<= 



= (sumscat[0 
= (sumscat[0 
(sumscat[2 
= (sumscat[2 
<= (sumscat[4 

= (sumscat[4 
= (sumscat[6 
= (sumscat[6 
= (sumscat[8 
= (sumscat[8 
<= (sumscat[ 
<= (sumscat[1 



<= 



> sumscat[1])? sumscat[0] : sumscat[1] 

> sumscat[1])? 0:1; 

> sumscat[3])? sumscat[2] : sumscat[3] 

> sumscat[3])? 2 : 3; 

> sumscat[5])? sumscat[4] : sumscat[5] 

> sumscat[5])? 4 : 5; 

> sumscat[7])? sumscat[6] : sumscat[7] 

> sumscat[7])? 6 : 7; 

> sumscat[9])? sumscat[8] : sumscat[9]; 

> sumscat[9])? 8:9; 

0]>sumscat[11])? sumscat[10] : sumscat[1 1]; 
0]>sumscat[11])? 10:11; 



end , 

if(fftfmished[1]) 
begin 

sumscat[0] <= (sumscat[0] > 
sumscat[1] <= (sumscat[0] > 
sumscat[2] <= (sumscat[4] > 
sumscat[3] <= (sumscat[4] > 
sumscat[4] <= (sumscat[8] > 
sumscat[5] <= (sumscat[8] > 
end 

if(fftfinished[2]&&!ramwritestop) 
spoffset <= sumscatmaxnol; 
end 

if(fftfinished[0]) 

begin 
$display(sumscat[0]) 
$display(sumscat[1 ]) 
$display(sumscat[2]) 
$display(sumscat[3]) 
Sdisplay(sumscat[4]) 
Sdisplay(sumscat[5]) 
$display(sumscat[6]) 
$display(sumscat[7]) 
$display(sumscat[8]) 
$display(sumscat[9]) 
Sdispiay(sumscat[1 0]); 
$display(sumscat[1 1 ]); 
Sdispiay(); 
end 



sumscat[2])? sumscat[0] : 
sumscat[2])? sumscat[1] : 
sumscat[6])? sumscat[4] : 
sumscat[6])? sumscatfs] : 
sumscat[10])? sumscat[8] 
sumscat[10])? sumscat[9] 



sumscat[2]; 
sumscat[3]; 
sumscat[6]; 
sumscat[7]; 
: sumscat[10]; 
: sumscat[1 1 j; 



55 end 
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always @(sumscat[0] or sumscat[1] or sumscat[2] or sumscat[3] or sumscat[4] or 
sumscat[5] 

or sumscatl or sumscat3 or sumscatS) 
begin 

5 sumscatmax = (sumscat[0] > sumscat[2])? sumscat[0] : sumscat[2]; 

sumscatmaxnoO = (sumscat[0] > sumscat[2])? sumscatl [3:0] : sumscat3[3:0]; 
sumscatmaxnol = (sumscatmax > sumscat[4])? sumscatmaxnoO : sumscat5[3:0]; 
end 

assign mocl12fftcount = mod12(fftcount); 
10 assign sumscatl = sumscat[1]; 
assign sumscat3 = sumscat[3]; 
assign sumscatS = sumscat[5]; 

/'FOLDENDS7 
15 /*FOLDENDSV 

/*FOLDBEGINS 0 0 "ram"*/ 
always @(posedge elk) 
ramaddr_ <= ramaddr; 

always @(ramwritestop or valid or finishedsearch or fftcount or carrier_number or 
20 ramwritestop or ramaddr_ or fftdata) 
begin 

ramaddr = ramaddr_; 
if(!ramwritestop) 
25 begin 

if(valid[0]&&!finishedsearch) 

ramaddr = {mcountlOl.fflcountlll.fftcountlZl.fflcountpj.fftcount^l.fftcountl 
5],fftcount[6], 

fftcount[7] ( fftcount[8],fftcount[9] t fftcount[10]}; 
30 end 

else 

ramaddr = carrier_number; 
ramin = fftdata; 

wrstrb = !(!ramwritestop&&valid[1]); 

35 end 

/*FOLDENDSV 

TFOLDBEGINS 0 0 "modulus approximation function"*/ 
function [11:0] modulus; 
40 input [11:0] i; 
input [11:0] j; 
reg [11:0] modi; 
reg [11:0] modj; 
begin 

45 modi = (i[11]?H:i) + i[11]; 

modj = (j[11]?-j:j) + j[11]: 
modulus = modi + modj; 

end • 

endfunction 
50 /*FOLDENDSV 

TFOLDBEGINS 0 0 n mod12"V 

function [3:0] mod12; 

input [10:0] count; 

reg [14:0] onetwelfth; 
55 reg [7:0] modulus12; 

parameter TWELFTH = 12'haab; 
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begin 

onetwelfth = {count[0],count[1],count[2],count[3],count[4],count[5], count [6], 
count[7],count[8],count[9],count[10]} * TWELFTH; 
modulus12 = {onetwelfth[14:9),rb0} + onetwelfth[14:9] + 4"h8; //*12 
mod12 = modulus12[7:4]; 
end 

/♦FOLDENDS7 

endfunction 

endmodule 



// Sccsld: @(#)bch_decode.v 1 .2 8/22/97 
/*FOLDBEGINS 0 0 "copyright"*/ 
1 5 //•*««**** ....**.*....... . 

// Copyright (c) 1997 Pioneer Digital Design Centre Limited 
// 

//NAME: BCH_rtl.v 
// 

20 // PURPOSE: BCH decoder for TPS pilots. Flags up to two error 
// positions using search technique. 
// 

n 

/•FOLDENDSV 
25 define DATA0_SIZE 7"b01 10100 
define DATA1_SIZE 7'b01 101 11 

module bch_decode (elk, resync, in_data, in valid, in finalwrite, out valid, out data); 

/*FOLDBEGINS 0 0 "l/Os"*/ ~ ~ 

30 input elk, resync; 

input in_data, in_valid, in_finalwrite; 

output out_valid; 

output out_data; 

reg out_data; 
35 reg out_valid; 

/'FOLDENDSV 

/*FOLDBEGINS 0 0 "variables"*/ 

reg resynch; 

reg valid; 
40 reg finalwrite; 

reg indata; 

reg [6:0] SO; 

reg [6:0] S1; 

reg [6:0] S2; 
45 reg [6:0] count; 

reg search 1 error, found2error, oneerror, twoerror; 

wire twoerror_; . . ... 

reg noerrors; 
50 reg delayO, delayl, delay2; 

reg [6:0] GsO; 

reg [6:0] Gs1; 

reg [6:0] Gs2; 

/*FOLDENDS*/ 
55 always @(posedge elk) 

begin 



10 
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/'FOLDBEGINS 0 2 "read in data and calculate syndromes"*/ 
resynch <= resync; 
if(resynch) 
begin 
valid <= 1'bO; 

50 <= 7'bO; 

51 <= 7'bO; 

52 <= 7'bO; 
end 

else 
begin 

valid <= in_valid; 

if (delay 1 &&twoerror_) 

begin 

/*FOLDBEGINS 0 4 "update after one in two errors found"*/ 

50 <= SO A GsO; 

51 <= S1 A Gs1 

52 <= S2 A Gs2 
/*FOLDENDS*/ 
end 

else if(valid) 
begin 

SO <= indata A MULTA1(S0) 



MULTA2(S1) 
MULTA3(S2) 



51 <= indata 

52 <= indata 
end 
end 

indata <= in_data; 
/*FOLDENDS*/ 
TFOLDBEGINS 0 2 "out 
if(resynch) 



valid control"*/ 



begin 

delayO <= 1'bO; 

delayl <= 1'bO; 

delay2 <= 1'bO; 

out_valid <= 1'bO; 

finalwrite <= 1'bO; 
end 
else 
begin 

finalwrite <= in_finalwrite; 
if(vaiid&&finalwrite) 
delayO <= 1'b1; 

else 

if(count == 'DATAI^SIZE-A) 

delayO <= 1'bO; 
delayl <= delayO; 
delay2 <= delayl; 
out_valid <= delay2; 
end 

TFOLDENDS7 
TFOLDBEGINS 0 2 "error search algorithm"*/ 
if(delay0&&!delay1) 
begin 

noerrors <= (SO == 7'bO); 
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search! error <= (GFULL(S0,S1) == S2); 

found2error <= 1'b0; 

twoerror <= 1'bO; 

count <= 7'bO; 
5 GsO <= 7'h50; 

Gs1 <= 7'h20; 

Gs2 <= 7'h3d; 
end 
else 

10 if(delayl) 
begin 

oneerror <= ((S0 A Gs0) == 7'b0)&&search1 error; 
twoerror <= twoerror_; 
if(twoerror_) 
15 begin 

search 1 error <= 1'b1; 

found2error <= 1*b1; 
end 

GsO <= DIV1(Gs0); 
20 Gs1 <= DIV2(Gs1); 

Gs2 <= DIV3(Gs2); 
count <= count + 1'b1; 
end 

out_data <= (twoerror| |oneerror)&&!noerrors- 
25 /*F0LDENDS7 
end 

assign twoerror_= ( GFULL((S0 A Gs0),(S1 A Gs1)) == 
(S2 A Gs2))&&!found2error&&!twoerror; 
TFOLDBEGINS 0 0 "functions"*/ 
30 /*FOLDBEGINS 0 0 "GFULL function"*/ 

function [6:0] GFULL; 
input [6:0] X; 
input [6:0] Y; 
35 reg [6:0] AO, A1 , A2, A3, A4, A5, A6; 
integer i; 
begin 

A0 = X; 

A1 = {A0[5],A0[4],A0[3],A0[2] A A0[6],A0[1],A0[01.A0[6]} 
40 A2 = {A1[5].A1[4],A1[3],A1[2] A A1[6],A1[1].A1[0].A1[6]} 
A3 = {A2[5].A2[4],A2[3],A2[2] A A2[6],A2[1],A2[0];A2[6]} 
A4 = {A3[5].A3[4],A3[3],A3[2] A A3[6],A3[1].A3[0].A3[6]} 
. A5 = {A4[5].A4[4],A4[3],A4[2] A A4[6],A4[1].A4[0].A4[6]} 
A6 = {A5[5],A5[4],A5[3],A5[2] A A5[6],A5[1],A5[0],A5[6]} 

45 

for(i=0;i<7;i=i+1) 
begin 

.A0[i] = A0[i] && Y[0]; 

A1[i] = A1[i] && Y[1]; 
50 A2[i] = A2[i] && Y[2J; 

A3[i] = A3[i] && Y[3]; 

A4[i] = A4[i] && Y[4]; 

A5[i] = A5[i] && Y[5]; 

A6[i] = A6[i] && Y[6]; 
55 end 

GFULL = AO A A1 A A2 A A3 A A4 A A5 A A6; 
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end 

endfunction 
/*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "MULTA1 function"*/ 
5 function [6:0] MULTA1; 
input [6:0] X; 
begin 

MULTA1 = {X[5],X[4],X[3],X[2] * X[6],X[1],X[0],X[6]}; 
end 

10 endfunction 

/*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "MULTA2 function"*/ 
function [6:0] MULTA2; 
input [6:0] X; 
1 5 begin 

MULTA2 = {X[4],X[3],X[2rX[6],X[1] A X[5],X[0],X[6].X[5]}; 
end 
endfunction 
/*FOLDENDS*/ 
20 /*FOLDBEGINS 0 0 "MULTA3 function"*/ 
function [6:0] MULTA3; 
input [6:0] X; 
begin 

MULTA3 = {XfSl.X^l^Xtei.XIIJ^Xt^.XtOl^X^J.X^.XtSJ.X^]}; 
25 end 

endfunction 
/*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "DIV1 function"*/ 
function [6:0] DIV1; 
30 input [6:0] X; 
begin 

DIV1 = {X[0],X[6],X[5],X[4],X[3] A X[0],X[2].X[1]}; 
end 
endfunction 
35 /*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "DIV2 function"*/ 
function [6:0] DIV2; 
input [6:0] X; 
begin 

40 DIV2 = {X[1],X[0],X[6],X[5],X[4] A X[1],X[3rX[0],X[2]}; 

end 
endfunction 
/*FOLDENDS7 

TFOLDBEGINS 0 0 "DIV3 function"*/ 
45 function [6:0] DIV3; 

input [6:0] X; . ■ 
begin 

DIV3 = {X[2'],X[1],X[0] I X[6],X[5] A X[2],X[4] A X[T],X[3] A X[0]}; 
end 

50 endfunction 

/*FOLDENDS*/ 
/*FOLDENDS*/ 
TFOLDBEGINS 0 0 ""*/ 
//always @(posedge elk) 

55 // Sdisplay(in_valid,,in_data,,in_finalwrite,,,,out_valid,,out_data,,,S0,,S1 ,,S2 ,,,); 
//always @(psedge elk) 
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// $display(resynch, I in_valid„in_data„out_valid, 1 S0„S1,,,,count„,delay0,,del 
ay1,,delay2,.,. 

// ,,,,delay2,,noerrors„oneerror,,twoerror,,out_data„out_valid); 
//always @(posedge elk) 

//$display(in_valid lI in_data„„out_valid fl out_data l>) S0„S1,,S2.„); 
//always @(posedge elk) 

// $display(in_valid,,in_data,„,out_valid I1 out data,,,S0,,S1 ,,S2.,,); 

/'FOLDENDS*/ 

endmodule 

Listing 21 



// Sccsld: @(#)tps.v 1 .2 9/1 5/97 
/'FOLDBEGINS 0 0 "copyright"*/ 
1 5 //*****•* ................ ...... .. *** * 

// Copyright (c) 1997 Pioneer Digital Design Centre Limited 
// 

//NAME: tps_rtl.v 
// 

20 // PURPOSE: Demodulates TPS pilots using DPSK. Finds sync bits. 
// Corrects up to two errors using BCH. 
// (DPSK produces two errors for each transmission error) 
// HISTORY: 

// 15/9/97 PK Added scan IO ports, te, tdin .tdout 
25 // 

/r ......**„..* ...**...*....♦*.*.*** 

TF0LDENDS7 

"define SYNCSEQO 16'b01 1 101 1 1 10101100 
"define SYNCSEQ1 16'b1000100001010011 
30 module tps (resync, elk, tps_valid, tps_pilot, tps_sync, tps_data, upsel, upaddr, 
uprstr, lupdata, 

te, tdin, tdout); 
/*FOLDBEGINS 0 0 "i/os"7 

input resync, elk, tps_valid, tps_pilot, upsel, uprstr, te, tdin; 
35 input [1:0] upaddr; 

inout [7:0] lupdata; 

output tps_sync, tdout; 

output [30:0] tps_data; 

/*FOLDENDS*/ 
40 TFOLDBEGINS 0 0 "registers"*/ 

reg resynch; 

reg [1:0] foundsync; 

reg [66:0] tpsreg; 

reg [15:0] syncreg; 
45 reg [1:0] tpsvalid; 

reg [1:0] pilot; 

reg tps_sync; 

reg [7:0] bch_count; 

reg [2:0] bch_go; 
50 reg bch_finalwrite; 

wire bch_data; 

wire bch_valid; 

wire bch_error; 

integer i; 

55 wire upselO; 

wire upsel 1 ; 
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wire upsel2; 
wire upsel3; 
/*FOLDENDS*/ 



15 



20 



25 



30 



35 



40 



45 



50 



always @(posedge elk) 
begin 

/*FOLDBEGINS 0 2 "Synchronise to TPS"*/ 
resynch <= resync; 

if(tpsvalid[0]&&!(foundsync[0]| |foundsync[1]| |tps_sync)) 
begin 

tpsreg[66] <= pilot[1] A pilot[0]; 
for(i=0;i<66;i=i+1) 

tpsreg[i] <= tpsreg[i+1]; 



else 

if(bch_valid&&bch_error) 

tpsreg[bch_count] <= !tpsreg[bch_count]; 
if(tpsvalid[0]&&(foundsync[0]| |foundsync[1])) 
begin 

syncreg[15] <= pilot[1] A pilot[0]; 
for(i=0;i<15;i=i+1) 

syncregfi] <= syncreg[i+1]; 

end 

pilot[0] <= tps_pilot; 
pilot[1] <=pilot[0]; 
if(resynch) 
begin 

tpsvalid <= 2'b0; 

tps_sync <= 1'b0; 

bch_go <= 3'b0; 

bch_finaiwrite <= 1'b0; 

bch_count <= 8*b0; 

foundsync <= 2'bO; 
end 
else 
begin 

tpsvalid[0] <= tps_valid; 
tpsvalid[1] <= tpsvalid[0]; 
bch_go[1] <= bch_go[0]; 
bch_go[2] <= bch_go[1]; 

bch_finalwrite <= (bch_count == 65)&&bch_go[2]; 
if((bch_count == 52)&&bch_valid) 

tps_sync <= 1'b1; 

/*FOLDBEGINS 0 2 "counter 11 */ 
if(bch_count == 66) 
bch_count <= 8'b0; 

else if(tpsvalid[1]&&!(foundsync[0] | j foundsync[1] 
begin 

if(tpsreg[15:0] == 'SYNCSEQ1) 
bch_count <= 8'hfe; //-2 
if(tpsreg[15:0] == 'SYNCSEQ0) 
bch_count <= 8'hfe; 11-2 



else if(tpsvalid[1]&&(bch_count==15)&&(foundsync[0] || foundsync[1])) 



end 
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bch_count <= 8'hfe; //-2 
y else 
j begin 

/ if(bch_valid || bch_go[0] || ((foundsync[0] || foundsync[1])&&tpsvalicl[0])) 

5 bch_count <= bch_count + Vb1; 

end 

/*FOLDENDS7 
/*FOLDBEGINS 0 2 "BCH + second SYNC reg control"*/ 
if(bch_count == 66) 
10 begin 

bch_go <= 3'bO; 
end 

else if(tpsvalid[1]) 
15 begin 

if(foundsync[0] || foundsync[1]) 
begin 

if(bch_count==15) 

begin 

20 if(((syncreg[15:0] == *SYNCSEQ0)&&foundsync[1])| | ((syncreg[15:0] 

== *SYNCSEQ1)&&foundsync[0]) ) 
bch_go[0] <= 1'b1; 
else 

foundsync <= 2'bO; 
25 end 
end 
else 
begin 

if(tpsreg[15:0] == 'SYNCSEQ1) 
30 foundsync[1] <= 1'b1; 

if{tpsreg[15:0] == 'SYNCSEQO) 

foundsync[0] <= 1'b1; 
end 
end 

35 /*FOLDENDS*/ 
end 

/*FOLDENDS*/ 
end 

assign bch_data = tpsreg[bch_count]; 
40 /*FOLDBEGINS 0 0 ,m 7 
//always @(posedge elk) 
//begin 

// $write(tps_valid , ,tps_sy nc, ,tps_pilot, ,tpsvalid[ 1 ] , .pilot 

// bchjinalwrite, bch_go[2] t ,bch_data,,bch_valid,,bch_error, t bch_count )t tps 

45 ..sync,,,,,); 

// $displayb(tpsreg„syncreg„foundsync); * • ■ 

//end 

/*FOLDENDS7 

/TOLDBEGINS 0 0 "micro access"*/ 
50 assign upselO = upsel&&uprstr&&!upaddr[1]&&!upaddr[0]; 

assign upseM = upsel&&uprstr&&!upaddr[1]&& upaddr[0]; 

assign upsel2 = upsel&&uprstr&& upaddr[1]&&!upaddr[0]; 

assign upsel3 = upsel&&uprstr&& upaddr[1]&& upaddr[0]; 

assign lupdata = upselO? {1'b0,tps_data[30:24]} : 8'bz, 
55 lupdata = upseM? tps_data[23:16] : 8'bz, 

lupdata = upsel2? tps_data[1 5:8] : 8'bz, 
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lupdata = upsel3? tps data[7:01 : 8'bz; 
/'FOLDENDS*/ 

assign tps_data = tpsreg[52:22]; 

bch_decode bch1 (.clk(clk), .resync(resync), .in_valid(bch_go[2]), 
.in_finalwrite(bch_finalwrite), .in_data(bch_data), 

.out_valid(bch_valid), .out_data(bch_error)); 

endmodule 



Listing 22 

//SccsID = %W% %G% 



//FOLDBEGINS 0 0 "Copyright (c) 1997 Pioneer Digital Design Centre Limited ..." 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

NAME: sydint_rtl.v 

20 PURPOSE: <a one line description> 

CREATED: Thu 14 Aug 1997 BY: Paul(Paul McCloy) 

MODIFICATION HISTORY: 
25 1 5/9/97 PK Increased width to 1 3 to allow for bad_carrier flag 

v 

//FOLDENDS 

30 //FOLDBEGINS 0 0 "module symdint ... <- top level" 
llllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllllimill 
module symdint 
//FOLDBEGINS 0 0 "pins ..." 
( 

35 out_data, 
valid, 

d_symbol, 

valid_in, 
40 demap_data, 
odd_symbol, 
symbol, 
carrierO, 
constellation, 

45 

//FOLDBEGINS 0 3 "ram pins ..." 
ram_a, 
ram_di, 
ram_do, 
50 ram_wreq, 

//FOLDENDS 

//FOLDBEGINS 0 3 "scan pins ..." 
tdin, 
55 tdout, 
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te. 

//FOLDENDS 

nrst, 
5 elk 

); 

//FOLDENDS 

parameter WIDTH = 13; //Modified by PK 15/9/97; 12->13 
10 parameter ADDR_WIDTH =11; 

//FOLDBEGINS 0 2 "outputs ..." 
output tdout; 

15 output valid; 

output [17:0]out_data; 
output d_symbol; 

output [ADDR_WIDTH-1 :0]ram_a; 
20 output [WIDTH-1:0]ram_di; 
output ram_wreq; 
//FOLDENDS 
//FOLDBEGINS 0 2 "inputs ..." 

25 input valid_in; 

input [WIDTH-1 :0]demap_data; 

input odd_symbol; 

input symbol; 

input carrierO; 
30 input [WIDTH-1 :0]ram_do; 

input [1:0]constellation; 

input tdin, te; 

35 input nrst, elk; 

//FOLDENDS 
//FOLDBEGINS 0 2 "regs / wires ..." 

//FOLDBEGINS 0 0 "inputs regs ..." 

40 

reg valid_in_reg; 

reg [WIDTH-1 :0]demap_data_reg; 
reg odd_symbol_reg; 
reg symbol_reg; 
45 reg [WIDTH-1 :0]ram_do_reg; 
reg [1:0]constellation_reg; • 
//FOLDENDS 

//FOLDBEGINS 0 0 "output regs ..." 

50 reg valid; 

reg [17:0]out_data; 
reg d_symbol; 

reg [ADDR_WIDTH-1:0]ram_a; 

55 

reg [WIDTH-1 :0]ram_di; 
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reg ram_wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 "instate_reg ... " 

parameter INSTATE_WAIT_SYMBOL = 2'dO; 
parameter I N STATE_WAIT_VAL1 D = 2'd1; 
parameter I N STATE_WR ITE = 2"d2; 
parameter I NSTATE_WRITE_RAM = 2'd3; 

reg [1:0]instate_reg; 
//FOLDENDS 

//FOLDBEGINS 0 0 "outstate_reg ..." 

parameter O UTSTATE_WA IT_WR I TEF I N I S H E D = 3'dO 
parameter OUTSTATE_WAIT0 = 3'd1 ; 
parameter OUTSTATE_WAIT1 = 3'd2; 
parameter O UTSTATE_R E AD RAM = 3'd3; 
parameter OUTSTATE_WAIT2 = 3'd4; 
parameter OUTSTATE_OUTPUTDATA = 3'd5; 
parameter OUTSTATE_WAIT3 = 3'd6; 

reg [2:0]outstate_reg; 
//FOLDENDS 

reg [ADDR_WIDTH-1 :0]read_addr_reg; 

reg [WIDTH-1:0]data_reg; 

reg next_read_reg, next_write_reg; 

reg frist_data_reg; 

reg odd_read_reg, odd_write_reg; 

reg sym_rst_read_reg, sym_rst_write_reg; 

reg [17:0] demapped; 
reg [3:0] iminus; 
reg [3:0] qminus; 
reg [8:0] outi; 
reg [8:0] outq; 
reg [5:0] demap; 



//FOLDBEGINS 0 0 "wires ..." 

wire [ADDR_WIDTH-1:0]address_read, address_write; 
wire finished_read, finished_write; 
wire valid_read, write_valid; 

wire [5:0]ini. inq; 

//FOLDENDS 

//FOLDENDS 

ag #(ADDR_WIDTH) r 
//FOLDBEGINS 0 2 "pins ..." 
( 

.address(address_read), 

.finished(finished_read), 
.next(next_read_reg), 
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. random(odd_read_reg) , 

.sym_rst(syrn_rst_read_reg), 

.nrst(nrst), 

.clk(clk) 

5 ); 

//FOLDENDS 

ag #(ADDFMA/IDTH) w 
//FOLDBEGINS 0 2 "pins ..." 

10 ( 

.address(address_write), 

.finished(finished_write), 

.next(next_write_reg) t 

.random(~odd_write_reg), 
1 5 .sym_rst(sym_rst_write_reg), 

.nrst(nrst), 

.clk(clk) 

); 

//FOLDENDS 

20 

//FOLDBEGINS 0 2 "latch inputs ..." 

always @(posedge elk) 

begin 

valid_in_reg <= valid_in; 
25 demap_data_reg <= demap_data; 

odd_symbol_reg <= odd_symbol; 

symbol_reg <= symbol; 

ram_do_reg <= ram_do; 

constellation_reg <= constellation; 
30 end 

//FOLDENDS 

always @(posedge elk) 
begin 
35 if( -nrst ) 

//FOLDBEGINS 0 4 "reset ..." 

begin 

instate_reg <= INSTATE_WAIT_SYMBOL; 
outstate_reg <= OUTSTATE_WAIT_WRITEFINISHED; 
40 next_read_reg <= 0; 

end 

//FOLDENDS 

else 

begin 

45 //FOLDBEGINS 0 4 "input state machine ..." 

//$write("DB(%0d %m): instate_reg=%0d fw=%b\n'\ 
// $time, instate_reg, finished_write); 
• case (instate_reg) 

INSTATE_WAIT_SYMBOL: begin 
50 sym_rst_write_reg <= 1 ; 

next_write_reg <= 0; 
ram_wreq <= 0; 

if( symbol_reg ) 
55 begin 
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//$write( H DB(%0d %m): GOT = %x (NEW SYMBOL)\n M , Stime, 

demap_data_reg); 
$write("DB(%0d %m): START WRlTE\n ,, ( $time); 
odd_write_reg <= odd_symbol_reg; 
5 data_reg <= demap_data_reg; 

instate_reg <= I NSTATE_WR ITE ; 
end 
end 

I N STATE_WAIT_VAL I D : begin 
10 ram_wreq <= 0; 

next_write_reg <= 0; 
if( finished_write ) 
begin 

$write("DB(%0d %m): END(1) WRITE\n", $time); 
15 instate_reg <= INSTATE_WAIT_SYMBOL; 

end 
else 
begin 

if( valid_in_reg ) 
20 begin 

data_reg <= demap_data_reg; 
instate_reg <= I N STATE_WR ITE ; 
end 
end 

25 end 

INSTATE JA/RITE: begin 
sym_rst_write_reg <= 0; 
next_write_reg <= 1 ; 
ram_a <= address_write; 
30 //Swrite( M DB(%0d %m): RWhte[%x] = %x\n M , Stime, address write, 

data_reg); 
ram_di <= data_reg; 
ram__wreq <= 1 ; 
if( finished_write ) 
35 begin 

$write("DB(%0d %m): END(2) WRITE\n M ( Stime); 
instate_reg <= INSTATE_WAIT_SYMBOL; 
ram_wreq <= 0; 
end 

40 else 

instate_reg <= I N STATE_WAIT_VALI D ; 
end 

endcase 

//FOLDENDS 
45 //FOLDBEGINS 0 4 "outputstate machine " 

//$write( n DB(%0d %m): outstate_reg=%0d nr:%b r:%b\n M , ' 
// Stime, outstate_reg, next_read_reg, odd_symbol_reg); 
case (outstate_reg) 

OUTSTATE_WAIT_WRITEFINISHED: begin 
50 sym_rst_read_reg <= 1; 

frist_data_reg <= 1 ; 
valid <= 0; 

if( finished_write ) 
55 begin 

odd_read_reg <= odd_write_reg; 
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outstate_reg <= OUTSTATE_WAIT0; 
$write("DB(%0d %m): START READ\n", Stime); 
//$write( M DB(%Od %m): Read (NEW SYMBOL)\n", Stime, 
address_read); 
5 end 
end 

OUTSTATE_WAIT0: begin 
sym_rst_read_reg <= 0; 
outstate_reg <= OUTSTATE_WAIT1 ; 
10 end 

OUTSTATE_WAIT1 : begin 

outstate_reg <= OUTSTATE_READRAM; 

end 

OUTSTATE_READRAM : begin 
15 //$write( H DB(%0d %m): Read [%x]\n*\ Stime, address_read); 

ram_a <= address_read; 
ram_wreq <= 0; 
next_read_reg <= 1 ; 
outstate_reg <= OUTSTATEJA/AIT2; 

20 end 

OUTSTATE_WAIT2: begin 
next_read_reg <= 0; 

outstate_reg <= OUTSTATE_OUTPUTDATA; 

end 

25 OUTSTATEJDUTPUTDATA: begin 

out_data <= {outi[8:6] t outq[8:6], outi[5:3], 
outq[5:3], outi[2:0], outq[2:0]}; 
valid <= 1; 

d_symbol <= frist_data_jeg; 
30 frist_data_reg <= 0; 

outstate_reg <= OUTSTATEJ/VAIT3; 

end 

OUTSTATE_WAIT3: begin 
valid <= 0; 
35 if( finished_read ) 

begin 

outstate_reg <= OUTSTATE_WAIT_WRITEFINISHED; 
$write("DB(%0d %m): END READ\n", Stime); 
end 

40 else 

outstate_reg <= OUTSTATE_WAIT0; 
end 

endcase 
//FOLDENDS 
45 end 

end . 

always @(coostellation_reg or ini or inq) 
//FOLDBEGINS 0 2 "demapper 
50 begin 

//FOLDBEGINS 0 2 "coarse demapping" 

iminus = {ini[5:3],1'b0} -2'd3; 
qminus = {inq[5:3] ( 1'b0} -2'd3; 
55 if(constellation_reg==2'b01) 
begin 
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demap ={2^0, 

iminus[2], 

qminus[2], 

!(iminus[2] A iminus[1]), 
5 !(qminus[2] A qminus[1]) 

}; 

//$writeb(demap )( ); 
//$display(iminus,,ini[5:3]); 

end 

10 else if(constellation_reg==2 , b10) 

begin 

iminus = {ini[5:3],rb0} -3 f d7; 
qminus = {inq[5:3],1'b0} -3'd7; 
demap = { iminus[3], 
15 qminus[3], 

!(iminus[3] A iminus[2]), 
!(qminus[3] A qminus[2]), 
(iminus[2] A iminus[1]), 
(qminus[2] A qminus[1 ]) 
20 }; 
end 
else 

demap = 6'bO; 

25 //FOLDENDS 

if(constellation_reg==2'b01 ) 
begin 

//FOLDBEGINS 0 4 "16QAM" 
30 if(!iminus[1]&&iminus[0]) 
begin 

outi[8:6] = 3'bO; 

outi[5:3] = demap[3]? 3'b111 : 3'b0; 
outi[2:0] = iminus[2]? ini[2:0] : Hni[2:0]; 
35 end 
else 
begin 

outi[8:6] = 3'b0; 
outi[5:3] = Hni[2:0]; 
40 outi[2:0] = 3'b111; 

end 

if(!qminus[1]&&qminus[0]) 
begin 

outq[8:6] = 3'b0; 
45 outq[5:3] = demap[2]? 3'b1 1 1 : 3'b0; 

outq[2:0] = qminus[2]? inq[2:0] : ~inq[2:0]; 
end 
else * 
begin 

50 outq[8:6] = 3'b0; 

outq[5:3] = -inq[2:0]; 
outq[2:0] = 3'b111; 
end 



55 



//FOLDENDS 
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end 

else if(constellation_reg==2'b1 0) 
begin 

//FOLDBEGINS 0 4 "64QAM" 
5 if(!iminus[1]) 
begin 

outi[8:6] = demap[5]? 3'b1 1 1 : 3'bO; 

outi[5:3] = demap[3]? 3 f b1 1 1 : 3 f b0; 

outi[2:0] = iminus[2]? Hni[2:0] : ini[2:0]; 
10 end 

else if(!iminus[2]) 
begin 

outi[8:6] = demap[5]? 3'b111 : 3'bO; 

outi[5:3] = iminus[3]? ini[2:0] : Hni[2:0]; 
15 outi[2:0] = demap[1]? 3'b111 : 3'bO; 

end 
else 
begin 

outi[8:6] = Hni[2:0]; 
20 outi[5:3] = demap[3]? 3'b1 1 1 : 3'bO; 

outi[2:0] = demap[1]? 3'b111 : 3'bO; 
end 

if(!qminus[1]) 
begin 

25 outq[8:6] = demap[4]? 3'b1 1 1 : 3'bO; 

outq[5:3] = dernap[2]? 3'b1 1 1 : 3'bO; 
outq[2:0] = qminus[2]? ^inq[2:0] : inq[2:0]; 
end 

else if(!qminus[2]) 
30 begin 

outq[8:6] = demap[4]? 3'b111 : 3'bO; 

outq[5:3] = qminus[3]? inq[2:0] : -inq[2:0]; 

outq[2:0] = demap[0]? 3'b1 1 1 : 3'bO; 
end 

35 else 
begin 

outq[8:6] = Hnq[2:0]; 
outq[5:3] = demap[2]? 3'b1 1 1 : 3*b0; 
outq[2:0] = demap[0]? 3'b111 : 3'bO; 
40 end 

//FOLDENDS 
end 
else 
begin 

45 //FOLDBEGINS 0 4 "QPSK" 
outi = {6 f b0 -ini[2:0]}; 
outq = {6'b0 ,Hnq[2:0]}; 
//FOLDENDS 
end 



50 



end 

//FOLDENDS 



assign ini = ram_do_reg[1 1 :6]; 
55 assign inq = ram_do_reg[5:0); 
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endmoclule 
//FOLDENDS 



//FOLDBEGINS 0 0 "module ag (address gereration)..." 
5 ///////////////////^ 
module ag 

//FOLDBEGINS 0 0 "pins ..." 
( 

address, 
10 finished, 

next, 

random, 

syrrwst, 

15 

nrst, 
elk 

); 

//FOLDENDS 

20 

parameter ADDR_WIDTH = 12; 

//FOLDBEGINS 0 2 "outputs ..." 
output [ADDR__WIDTH-1:0] address; 
25 output finished; 
//FOLDENDS 

//FOLDBEGINS 0 2 "inputs ..." 
input next; 
input random; 
30 input sym_rst; 
input nrst, elk; 
//FOLDENDS 

//FOLDBEGINS 0 2 "regs ..." 
35 integer i; 

reg finished; 

reg [9:0] prsr_reg; 

reg [11:0] count_reg; 

40 

wire address_vaiid; 
//FOLDENDS 

always @(posedge elk) 
45 begin 

if( -nrst ) . • 
begin 

count_reg <= 0; 

50 prsr_jeg <= 10'd0; 

end 
else 
begin 

if(sym_rst) 
55 begin 

finished <= 0; 
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count_reg <= 0; 
end 
else 

if( next | (!address_valid & random) ) 
5 begin 

//$write("DB(%Od %m): Next(r:%d)\n ,f , $time f random); 
if( random ) 
//FOLDBEGINS 0 8 "do the random stuff ..." 
begin 

10 if( !address_valid ) 

begin 

//FOLDBEGINS 0 4 "drive the prsr ..." 
if( count_reg == 11'd0 ) 

prsr_reg <= 10'd0; 
1 5 else 

if( count_reg == 11'd1 ) 
prsr_reg <= 10'd1; 
else 
begin 

20 for(i=0;i<9;i=i+1) 

prsr_reg[i] <= prsr_reg[i+1]; 
prsr_reg[9] <= prsr_reg[0] A prsr_reg[3]; 
end 

25 

//FOLDENDS 

count_reg <= count_reg + 1; 

//$write( M DB(%0d %m): count=%0d Rand(Retry)\n", $time, 

count_reg); 
30 end 
else 
begin 

if( count_reg == 1 1'd2047 ) 
begin 

35 //$write("DB(%0d %m): *** FINISHED Rand\n", Stime); 

finished <= 1; 
count_reg <= 0; 
prsr_reg <= 10'd0; 
end 

40 else 

begin 

//FOLDBEGINS 0 6 "drive the prsr ..." 
if( count_reg == 11'd0 ) 

prsr_reg <= 10'd0; 
45 else 

if( count__reg == 1Vd'1 ) 

prsr_reg <= 10'd1; 

else 

50 begin 

for(i=0;i<9;i=i+1) 
prsr__reg[i] <= prsr_reg[i+1]; 
prsr_reg[9] <= prsr_reg[0] A prsr_reg[3]; 
end 

55 //FOLDENDS 

count_reg <= count_reg + 1 ; 
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//$write( M DB(%0d %m): count=%0d Rand\n", Stime, count.reg); 
finished <= 0; 

end 
end 

end 

//FOLDENDS 
else 

//FOLDBEGINS 0 8 "do the sequential stuff ..." 
begin 

if( count_reg != 1 1'd 1511 ) 
begin 

//$write("DB(%0d %m): count=%0d Sequ\n", Stime, count_reg); 

count_reg <= count_reg +1; 

finished <= 0; 
end 
else 
begin 

//$write("DB(%0d %m): *•* FINISHED Sequ\n", $time); 

finished <= 1; 

count_reg <= 0; 
end 
end 

//FOLDENDS 

end 
end 

end 

//FOLDBEGINS 0 2 "assign address ..." 

assign address = (random) ? ({count_reg[0], // 10 

prsr_reg[2], // 9 

prsr_reg[5], // 8 

prsr_reg[8], // 7 

prsr_reg[3], // 6 

prsr_reg[7], // 5 

prsr_reg[0], // 4 

prsr_reg[1], // 3 

prsr_reg[4], // 2 

prsr_reg[6], // 1 

prsr_reg[9]}): // 0 
count_reg; 
//FOLDENDS 

assign address_valid = (address < 11'd1512); 

endmodule 

//FOLDENDS 

Listing 23 

//SccsID: "@(#)bitdeint.v 1.4 9/14/97" 
»i?iiSi?^Sl i!!i?.?*S. IS PJ^Yliitl^^l.lSSr. ft'™5 e r Digital Des '9 n Centre Limited" 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
NAME: bitdeint_rtl.v 

PURPOSE: bit deinterleaver — . - 
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15 



20 



25 



30 



35 



40 



45 



50 



CREATED: Wed 23 Jul 1997 BY: Paul(Paul McCioy) 
MODIFICATION HISTORY:. 



//FOLDENDS 

module bitdeint 
//FOLDBEGINS 0 2 "pins ..." 
( 

i_data t 
q_data, 
discard_i, 
discard_q, 

valid, //output 

//FOLDBEGINS 0 2 "ramO pins ..." 

ram0_a, 
ram0_di, 
ram0_do, 
ram0_wreq, 
ram0_ce, 
//FOLDENDS 
//FOLDBEGINS 0 2 "rami pins ..." 

ram1_a t 
ram1_di, 
ram1_do, 
ram1_wreq, 
ram1_ce, 
//FOLDENDS 
//FOLDBEGINS 0 2 "ram2 pins ..." 

ram2_a, 

ram2_di, 

ram2_do, 

ram2_wreq, 

ram2_ce, 

//FOLDENDS 

bad_carrier, 
valid_in, 
datajn, 
symbol, 

constellation, // constellation 
alpha,. // does not do anything yet 

//FOLDBEGINS 0 2 "scan pins ..." 

tdin, 

tdout, 

te, 

//FOLDENDS 



nrst, 
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elk 

); 

//FOLDENDS 



5 



parameter SBW = 3; // soft bit width 



//FOLDBEGINS 0 2 "outputs ..." 
//FOLDBEGINS 0 0 "ramO outputs ..." 
output [6:0]ram0_a; 
10 output [((SBW+1)«1)-1:0]ramO_di; 
output ram0_ce; 
output ram0_wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 "rami outputs ..." 
15 output [6:0]ram1_a; 

output [((SBW+1 )«1)-1 :0]ram1_di; 

output ram1_ce; 

output ram1_wreq; 

//FOLDENDS 
20 //FOLDBEGINS 0 0 "ram2 outputs ..." 

output [6:0]ram2_a; 

output [((SBW+1 )«1)-1:0]ram2_di; 

output ram2_ce; 

output ram2_wreq; 
25 //FOLDENDS 

output tdout; 

output [SBW-1 :0]i_data; 
30 output [SBW- 1:0]q_data; 
output discard_i; 
output discard_q; 



//FOLDENDS 

//FOLDBEGINS 0 2 "inputs ..." 

input [((SBW+1 )«1)-1:0]ram0_do; 
40 input [((SBW+1)«1)-1:0]ram1_do; 
input [((SBW+1 )«1)-1:0]ram2_do; 

input bad_carrier; 
input valid_in; 

45 input [((SBW<<2)+(SBW«1 ))-1 :0]data_in; // 6*SBW bits 
input symbol; 
input [1:0] constellation; 
input [2:0] alpha; 

50 input tdin, te; 

input nrst, elk; 
//FOLDENDS 

55 //FOLDBEGINS 0 2 "reg / wire ..." 
//FOLDBEGINS 0 0 "outputs ..." 



output valid; 



35 
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//FOLDBEGINS 0 0 "ramO regs ..." 
reg [6:0]ram0_a; 
reg [((SBW+1)<<1)-1:0]ramO_di; 
reg ramO_ce; 
5 reg ramO_wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 "rami regs ..." 
reg [6:0]ram1_a; 
reg [((SBW+1)«1)-1:0]ram1_di; 
10 reg ram1_ce; 
reg ram1_wreq; 
//FOLDENDS 

//FOLDBEGINS 0 0 n ram2 regs ..." 
reg [6:0]ram2_a; 
15 reg [((SBW+1)«1)-1 :0]ram2_di; 
reg ram2_ce; 
reg ram2_wreq; 
//FOLDENDS 

20 reg [SBW-1:0]i_data; 

reg [SBW-1:0]q_data; 
reg discard j; 
reg discard_q; 

25 reg valid; 

//FOLDENDS 

//FOLDBEGINS 0 0 "inputs ..." 
reg valid_in_reg; 

30 reg [((SBW«2)+(SBW«1 ))-1 :0]data_in_reg; // 6*SBW bits 
reg symbol_reg, bad_carrier_reg; 

reg [1:0] constellation_reg; 
reg [2:0] alpha_reg; 
35 reg [((SBW+1)«1)-1:0]ram0_do_reg; 

reg [((SBW+1)<<1)-1:0]ram1_do_reg; 
reg [((SBW+1)<<1)-1:0]ram2_do_reg; 

//FOLDENDS 

40 

reg [6:0]i0_adr_reg; 
reg [6:0]i1_adr_reg; 
reg [6:0]i2_adr_reg; 
reg [6:0]i3_adr_reg; 
45 reg [6:0]i4_adr_reg; 

reg [6:0]i5_adr_reg; ' 

reg [2:0] mode_reg; 

reg [(SBW«2)+(SBW«1)-1:0]data_reg; // 6*(SBW) bits 
50 reg [((SBW+1)«1)+SBW:0]Lout_buf_reg, q_out_buf_reg; // 3*(SBW+1) bits 

reg ram_filled_reg, out_buf_full_reg t bad_car_reg; 

wire [SBW:0] iO_in, qOJn, i1_in, q1_in ,i2jn ,q2_in; 
55 wire [SBW:0] iO_ram, qO_ram, i1_ram, q1 ram ,i2 ram ,q2 ram; 
//FOLDENDS " 
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//FOLDBEGINS 0 2 "latch inputs ..." 

always @(posedge elk) 

begin 

bad_carrier_reg <= bad_carrier; 
valid_in_reg <= validjn; 
data_in_reg <= data_in; 
symbol_reg <= symbol; 
constellation_reg <= constellation; 
alpha_reg <= alpha; 
ramO_do_reg <= ramOjdo; 
rami_do_reg <= ram1_do; 
ram2_do_reg <= ram2_do; 
end 

//FOLDENDS 

always @(posedge elk) 
begin 
if( -nrst ) 

//FOLDBEGINS 0 4 "reset ..." 
begin 

mode_reg <= 2'b00; 
valid <= 0; 
i0__adr_reg <= 0; 
i1_adr_reg <= 63; 
i2_adr_reg <= 105; 
i3_adr_reg <= 42; 
i4_adr_reg <= 21; 
i5_adr_reg <= 84; 



i_put_buf_reg <= 0; 
q_out_buf_reg <= 0; 
ram_filled_reg <= 0; 
out_buf_full_reg <= 0; 
end 

//FOLDENDS 

else 

begin 

if( valid_in_reg ) 

//FOLDBEGINS 0 6 "start cycle 

begin 

data_reg <= data_in_reg; 
bad_car_reg <= bad_carrier_reg; 

//$write("DB(%0d %m): data_reg=%X(%b.%b.%b)\n'\ Stime, data in reg 
// bad_carrier, bad_carrier reg ? bad car reaV ~ ~ 

//FOLDBEGINS 0 2 "logic to TeadiOJ ,2 
ram0_a <= i0_adr_reg; 
ram0_wreq <= 0; 

ram1_a <= M_adr_reg; 
ram1_wreq <= 0; 



ram2_a <= i2_adr_reg; 
ram2_wreq <= 0; 
//FOLDENDS 



10 
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ram0_ce <= 1 ; 

ram1_ce <= (constellation_reg == 2'b10) | 
(constellation_reg == 2'b01); 
ram2_ce <= (constellation_reg ~ 2'b10); 

//FOLDBEGINS 0 2 "output i1 and q1 ..." 
if( out_buf_full_reg & (constellation_reg != 2'bOO)) 
begin 

valid <= 1; 

i_data <= Lout_buf_reg[((SBW+1)«1)-2:(SBW+1)]; 
discardj <= Lout_buf_reg[((SBW+1)<<1)-1]; 

q_data <= q_out_buf_reg[((SBW+1)«1)-2:(SBW+1)]; 
15 discard_q <= q_out_buf_reg[((SBW+1)«1)-1]; 

//$write( n DB(%0d %m): OUT(1):%x %x\n" t Stime, 
// Lout_buf_reg[((SBW+1)«1)-2:(SBW+1)], 
// q_out_buf reg ((SBW+1)<<1)-2:(SBW+1)iy 
20 end 

//FOLDENDS 

mode_reg <= 3'b001; 
end 

25 //FOLDENDS 
else 
begin 

//$write("DB(%0d %m): m=%b\n n , Stime, mode_reg); 

30 case( mode^reg ) 

//FOLDBEGINS 0 8 "3'b001 : ... " 
3'b001: begin 

//FOLDBEGINS 0 4 "logic to read qO.1,2 ..." 
ram0_a <= i3_adr_reg; 
35 ram0_wreq <= 0; 

ram1_a <= i4_adr_reg; 
ram1_wreq <= 0; 

40 ram2_a <= i5_adr_reg; 

ram2_wreq <= 0; 
//FOLDENDS 
valid <= 0; 

mode_reg <= 3'b010; 
45 end 

//FOLDENDS 

//FOLDBEGINS 0 8 "3'b010: ..." 
3'b010: begin 
modej-eg <= 3'b011; 
50 //FOLDBEGINS 0 4 "output \2 and q2 ..." 

if( out_buf_fuil_reg & (constellation_reg == 2'b10)) 
begin 

valid <= 1; 

55 i_data <= i_out_buf_reg[SBW-1:0]; 

discard_i <= i_out_buf_reg[SBW]; ' 
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q_data <= q_out_buf_reg[SBW-1:0]; 
discard_q <= q_out_buf_reg[SBW]; 

//$write("DB(%0d %m): OUT(2):%x %x\n", Stime, 
II i_out_buf_reg[SBW-1:0], 
// q_out_buf_reg[SBW-1:0]); 
end 

//FOLDENDS 
end 
//FOLDENDS 

//FOLDBEGINS 0 8 "3'b01 1 : ... 
3'b011: begin 
valid <= 0; 

//$write("DB(%0d %m): ram read i0:%x i1:%x i2:%x\n" 
// Stime, 

// ram0_do_reg[((SBW+1)«1)-1:SBW+1], 
// ram1_do_reg[((SBW+1)«1)-l:SBW+1], 
// ram2_do_reg[((SBW+1)«1)-1:SBW+1]); 

i_out_buf_reg <= {ram0_do_reg[((SBW+1)«1)-1:SBW+1l 
ram1_do_reg[((SBW+1)«1)-1:SBW+1], 
ram2_do_reg[((SBW+ 1 ) « 1 )- 1 ;SBW+ 1 ]}; 

//FOLDBEGINS 0 4 "logic to write new i0,1,2 ..." 

ram0_a <= i0_adr_reg; 

ram0_wreq <= 1 ; 

ram0_di <= {i0_in, q0_ram}; 

ram1_a <= i1_adr_reg; 

ram1_wreq <= 1; 

ram1_di <= {i1_in, q1_ram}; 

ram2_a <= i2_adr_reg; 
ram2_wreq <= 1; 
ram2_di <= {i2_in, q2_ram}; 
//FOLDENDS 
mode_reg <= 3'b100; 
end 
//FOLDENDS 

//FOLDBEGINS 0 8 "3'b100: ... 
3'b1 00: begin 

//$write("DB(%0d %m): ram read q0:%x q1:%x q2 %x\n" 
// Stime, 

// ram0_do_reg[SBW:0], 
// ram1_do_reg[SBW:0], 
// ram2_do_reg[SBW:0]); 

q_out_buf_reg <= {ram0_do_reg[SBW:0], 

ram1_do_reg[SBW:0], 

ram2_do_reg[SBW:0]}; 

out_but_full_reg <= ram_filled_reg 
//FOLDBEGINS 0 4 "logic to write new q0,1,2 ..." 
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ram0_a <= i3_adr_reg; 

ram0_wreq <= 1; 

ram0_di <= {i0_ram, qO_in}; 

ram1_a <= i4_adr_reg; 

ram1_wreq <= 1; 

ram1_di <= {M_ram, q1__in}; 

ram2_a <= i5_adr_reg; 
ram2_wreq <= 1; 
ram2_di <= {i2_ram, q2 in}; 
//FOLDENDS 

//FOLDBEGINS 0 4 "output iO and qO ..." 

if( out_buf_full_reg ) 

begin 

valid <= 1 ; 

i_data <= i_out_buf_reg[((SBW+1)«1)+SBW-1:((SBW+1)«1)]- 
discard_i <= i_out_buf_reg[((SBW+1)«1)+SBVV]; 

q_data <= q_out_buf_reg[((SBW+1)«1)+SBW-1:((SBW+1)«1)]- 
discard_q <= q_out_buf_reg[((SBW+1)«1)+SBW]; 

//$write("DB(%Od %m): OUT(0):%x %x\n", Stime, 

II Lout_buf_reg[((SBW+1)«1)+SBW-1:((SBW+1)«1)], 
II q_out_buf_reg[((SBW+1 )«1 )+SBW-1 :((SBW+1 )«1 )]); 
end 

//FOLDENDS 
mode_reg <= 3'b101; 
end 
//FOLDENDS 

//FOLDBEGINS 0 8 "3'b101: ... " 

3'b101:begin 

valid <= 0; 

//FOLDBEGINS 0 4 "increment ram address ..." 

if( i0_adr_reg == 7'd125 ) 
begin 

i0_adr_reg <= 0; 

//FOLDBEGINS 0 2 "do i1_adr_reg (63 offset)..." 
i1_adr_reg <= (i1_adr_reg == 7'd20) ? 7'd84 : 
(i1_adr_reg == 7'd41) ? 7'd105 : 
(i1_adr_reg == 7'd62) ? 7'dO : 
(i1_adr_reg == 7'd83) ? 7'd21 : 
(i1_adr_reg == 7"d104) ? 7'd42 : 

7*d63 ; 

//FOLDENDS 

//FOLDBEGINS 0 2 "do i2_adr_reg (105 offset)..." 

i2_adr_reg <= (i2_adr_reg == 7'd20) ? 7'd42 : 

(i2_adr_reg == 7'd41) ? 7'd63 : 
(i2_adr_reg == 7'd62) ? 7'd84 : 
(i2_adr_reg == 7'd83) ? 7'd105 : 
(i2_adr_reg == 7'd104) ? 7'dO : 

7'd21 ; 

//FOLDENDS 
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//FOLDBEGINS 0 
i3_adr_reg <= (i3_ 



//FOLDBEGINS 0 
i4_adr_reg <= (i4_ 



//FOLDBEGINS 0 
i5_adr_reg <= (i5_ 
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2 "do i3_adr_reg (42 offset)..." 

adr_reg == 7'd20) ? 7'd105 : 
(i3_adr_reg == 7'd41) ? 7'dO : 
(i3_adr_reg == 7'd62) ? 7'd21 : 
(i3_adr_reg == 7'd83) ? 7'd42 . 
(i3_adr_reg == 7'd104) ? 7'd63 



2 "do i4_adr_reg (21 offset)..." 

adr_reg == 7'd20) ? 7'd0 : 

(i4_adr_reg == 7'd41) ? 7*d21 
(i4_adr_reg == 7'd62) ? 7*d42 
(i4_adr_reg == 7'd83) ? 7'd63 
(i4_adr_reg == 7'd104) ? 7'd84 



2 "do i5_adr_reg (84 offset)..." 

adr_reg == 7'd20) ? 7'd63 : 

(i5_adr_reg == 7'd41) ? 7'd84 : 
(i5_adr_reg == 7'd62) ? 7'd105 
(i5_adr_reg == 7'd83) ? 7'dO : 
(i5_adr_reg == 7*d104) ? 7'd21 



7'd84 ; 

//FOLDENDS 



7'd105 ; 
//FOLDENDS 



7'd42 ; 

//FOLDENDS 



ram_filled_reg <= 1 ; 
end 
else 
begin 
i0_adr_reg 
i1_adr_reg 
i2_adr_reg 
i3_adr_reg 
i4_adr_reg 

i5_adr_reg <= (i5_adr 
end 
//FOLDENDS 
end 
//FOLDENDS 
endcase 
end 
end 



<= i0_adr_reg + 1 ; 
<= (i1_adr_reg == 7'd125) ? 0 
<= (i2_adr_reg == 7'd125) ? 0 
<= (i3_adr_reg == 7*d125) ? 0 
<= (i4_adr_reg == 7'd125) ? 0 
reg == 7'd125) ? 0 



M_adr_reg +1 
i2_adr_reg +1 
i3_adr_reg +1 
i4_adr_reg +1 
i5_adr_reg +1 



end 



assign i0_in = { bad_car_reg, 

data_reg[(SBW«2)+(SBW«1)-1 :(SBW«2)+SBW]}; 
assign q0_in c { bad_car_reg, 
data_reg[(SBW«2)+SBW-1 :SBW«2]}; 
assign i1_in = { bad_car_reg, 
data_reg[(SBW«2)-1 :(SBW«1 )+SBW]}; 
assign q1_in = { bad_car_reg, 
data_reg[(SBW«1)+SBW-1 :SBW«1]}; 
assign i2_in = { bad_car_reg, 
data_reg[(SBW«1)-1 :SBW]}; 
assign q2_in = { bad_car_reg, 
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data_reg[SBW-1 :0]}; 

assign iO_ram = Lout_buf_reg[((SBW+1)«l)+SBW:((SBW+1)<<1)]* 
assign qO_ram = q_out_buf_reg[((SBW+1)«1)+SBW:((SBW+1)«1)]- 
5 assign i1_ram = i_out_buf_reg[((SBW+1)«1)-l:SBW+1]* 
assign q1_ram = q_out_buf_reg[((SBW+1)«1)-l;SBW+1]; 
assign i2_ram = i_out__buf_reg[SBW:0]; 
assign q2_ram = q_out_buf_reg[SBW:6]; 

10 endmodule 



Listing 24 

// Sccsld: %W% %G% 

/ * *** ************* *** 

15 Copyright (c) 1997 Pioneer Digital Design Centre Limited 



20 module acc_prod (elk, resync, load, symbol, new__phase, old_phase, xcount 
acc_6ut); 

input elk, resync, load, symbol; 
input [10:0] xcount; 
25 input [13:0] new_phase, old_phase; 
output [29:0] acc_out; 

reg [29:0] acc_out; 
reg [29:0] acc_int; 
30 reg [14:0] cliff; 
reg [25:0] xdiff; 

reg sign; 

reg [14:0] mod_diff; 
35 reg [25:0] mod_xdiff; 



always @ (posedge elk) 
40 begin 

if (resync) 
begin 

acc_out <= 0; 
acc_int <= 0; 
45 end 

else 
begin 
if (load) 

50 accjnt <= accjnt + {xdiff[25], xdiff[25] ( // sign extend 
xdiff[25], xdiff[25], xdiff}; 
if (symbol) 
begin 

acc_out <= accjnt; 
55 accjnt <= 0; ~~ 
end 



9NS0OCID' <WO__ 93 19410 A2 ( ^ 



10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



9NSDOCID- <WO 



WO 98/19410 PCT/US97/1891 1 

246 



end 
end 



always @ (new_phase or old_phase or xcount) 
begin 

diff = {new_phase[13], new_phase} // sign extend up to allow 

- {old_phase[13] ( old_phase}; // differences up to 360 
sign = diff[14]; 

mod_diff = sign ? (-diff + 1) : diff; 
mod_xdiff = mod_diff * {4'bO, xcount}; 
xdiff = sign ? (~mod_xdiff + 1) : mod_xdiff; 
end 



endmodule 



Listing 25 

// Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
***** ******************** w *^ 



module acc_simple (elk, resync, load, symbol, new_phase, old_phase, acc_out); 

input elk, resync, load, symbol; 
input [13:0] new_phase, old_phase; 
output [20:0] acc_out; 

reg [20:0] accjDut; 
reg [20:0] accjnt; 
reg [14:0] diff; 



always @ (posedge elk) 
begin 
if (resync) 
begin 

acc_out 0; 
accjnt <= 0; 
end 

else 

begin * 
if (load) 

accjnt <= accjnt + {diff[14], diff[14], // sign extend 

diff[14], diff[14], 

diff[14], diff[14], diff}; 
if (symbol) 
begin 

acc_out <= accjnt; 

accjnt <= 0; 
end 
end 



opi Qii 0-i_? ' 
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end 

always @ (new_phase or old_phase) 

diff = {new_phase[13], new_phase} // sign extend up to allow 
- {old_phase[13], old_phase}; // differences up to 360 

always @ (diff or load) 
begin: display 

reg[14:0] reaLdiff; 

if (load) 
begin 
if (diff[14]) 
begin 

reaLdiff = (-diff + 1); 

Sdisplay ("diff = -%0d", reaLdiff); 
end 
else 

Sdisplay ("diff = %0d", diff); 
end 

end // display 
endmodule 

Listing 26 

//Sccsld: %W% %G% 

* 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
***************************** *********** w ** wwv 



module addr_gen (elk, resync, u_symbol, uc_pilot, got_phase, en, load guard 
addr, xcount, guard_reg, symbol); 

input elk, resync, u_symbol, uc_pilot ( goLphase; 

input [1:0] guard; 

output en, load, symbol; 

output [1:0] guard_reg; 

output [9:0] addr; 

output [10:0] xcount; 

reg en, load, load_p, inc_count2, symbol; 
reg [1:0] guard_reg; 
reg [5:0] count45; 
reg [10:0] xcount; 
reg [9:0] addr; 



always @ (posedge elk) 
begin 
if (resync) 
begin 

count45 <= 0; 
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load_p <= 0; 
load <= 0; 
inc_count2 <= 0; 
symbol <= 0; 
guard_reg <= 0; 



end 

else 
begin 
10 if (u_symbol) 
begin 

inc_count2 <= 1; 
guard_reg <= guard; 
end 

15 if (inc_count2 && uc_pilot) 
begin 

inc_count2 <= 0; 
count45 <= 0; 
end 

20 if (got_phase) 

count45 <= count45 + 1; 
load_p <= en; 
load <= load__p; 

symbol <- (inc_count2 && uc_pilot); 



addr <= count45; 

en <= got_phase && Iresync && (count45 < 45); // !! 45 ? 
end 
end 



25 



30 



always @ (count45) 



case (count45) 



1 : xcount = 1 ; 



40 



45 



55 



50 



35 



2: xcount = 49; 

3: xcount = 55; 

4: xcount = 88; 

5: xcount = 142; 

6: xcount = 157; 

7: xcount = 193; 

8: xcount = 202; 

9: xcount = 256; 
10: xcount = 280 
11: xcount = 283 
12: xcount - 334 
13: xcount = 433 
14: xcount = 451 
15: xcount = 484 
16: xcourrt*=526 
17: xcount = 532 
18: xcount = 619 
19: xcount = 637 
20: xcount = 715; 
21: xcount = 760; 
22: xcount = 766; 
23: xcount = 781; 
24: xcount = 805; 
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25: xcount = 874 
26: xcount = 889 
27: xcount = 919 
28: xcount = 940 
29: xcount = 943 
30: xcount = 970 
31: xcount = 985; 
32. xcount =1051 
33: xcount =1102 
34: xcount =1108 
35: xcount =1111 
36: xcount =1138 
37: xcount = 1141 
38: xcount = 1147 
39: xcount = 1207 
40: xcount = 1270 
41: xcount = 1324 
42: xcount = 1378 
43: xcount = 1492 
44: xcount = 1684 
45: xcount = 1705 
default: xcount = 0; 
endcase 
endmodule 



Listing 27 



// Sccsld: %W% %G% 
Copyright (c) 1997 Pioneer Digital Design Centre Limited 



35 



40 



45 



module avg_8 (elk, resync, symbol, in_data t avg_out); 

parameter phase_width = 12; 

input elk, resync, symbol; 

input [phase_width-2:0] in_data; 

output [phase_width-2:0] avg_out; 

reg [phase_width-2:0] avg_out; 
reg [phase_width-2:0] store [7:0]; 



50 



55 



wire [phase_ 
wire [phase^ 
wire [phase_ 
wire [phase_ 
wire [phase_ 
wire [phase_ 
wire [phase_ 
wire [phase_ 



width-2:0 
"widttv2:0 
"width-2:0 
"width-2:0 
width-2:0 
"width-2:0 
'width-2:0 
width-2:0 



store7 




store[7 


store6 




store[6 


store5 




store[5 


store4 




store[4 


store3 




store[3 


store2 




store[2. 


store 1 




store[V 


storeO 




storefo^ 
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wire [phase_width+1:0] sum = ({store7[phase_width-2], store7[phase_width-2], 
store7[phase_width-2], store7} 

store6[phase_width-2], store6[phase_width-2], 



store6} 
store5} 
store4} 
store3} 
store2} 
store 1} 



+ {store6[phase_width-2 
+ {store5[phase_width-2 
+ {store4[phase_width-2 
+ {store3[phase_width-2 
+ {store2[phase_width-2 
+ {store 1[phase_width-2 
+ {store0[phase__width-2 



storeO}); 

always @ (ppsedge elk) 



begin 






if (resync) 




begin 






store 


[7] <= 


0; 


store 


;6] <= 


0; 


store 


:s] <= 


0; 


store 


4] <= 


0; 


store 


:3] <= 


0; 


store 


.2] <= 


0; 


store 


:i]<= 


0; 


store 


[0] <= 


0; 


avg_out <= 


0; 


end 






else if (symbol) 


begin 







store[7] <= store[6]; 
store[6] <= store[5]; 
store[5] <= store[4]; 
store[4] <= store[3]; 
store[3] <= store[2]; 
store[2] <= store[1]; 
store[1] <= store[0]; 
store[0] <= in_data; 
avg_out <= sum » 3; 
end 
end 

endmodule 



store5[phase_width-2], store5[phase_width-2], 
store4[phase_width-2], store4[phase_width-2], 
store3[phase_width-2], store3[phase_width-2], 
store2[phase_width-2], store2[phase_width-2], 
storel [phase j/vidth-2], store 1[phase_width-2], 
store0[phase_width-2], store0[phase_width-2], 



Listing 28 



// Sccsid: %W% %G% 
Copyright (c) 1997 Pioneer Digital Design Centre Limited 
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module twowire26 (elk, rst, in_valid, din, out_accept, out_valid, in_accept, 
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dout, set); 

input elk, rst, set, in_valid, out_accept; 

input [25:0] din; 

output in_accept, out_va!id; 

output [25:0] dout; 

reg in_accept, out_valid, accjnt. accjnt_reg, in_valid_reg, vaMnt; 
reg [25:0] dout, din_reg; 



always @ (posedge elk) 
begin 
if (rst) 

out_valid <= 0; 
15 else if (accjnt | j set) 
out__valid <= vaMnt; 

if (in_accept) 
begin 

20 in_valid_reg <= in_valid; 
din_reg <= din; 
end 

if (accjnt) 

25 dout <= in_accept ? din : din__reg; 
if (set) 

acc_int_reg <= 1 ; 
else 

30 acc_int_reg <= accjnt; 
end 

always @ (out_accept or out_valid or accjnt_reg or in_valid or in valid reg) 
begin ~ ~ 

35 accjnt = out_accept 1 1 !out_valid; 

in_accept = acc_int_reg j | !in_valid_reg; 
valjnt = in_accept ? in_valid : in_valid_reg; 
end 

40 endmodule 

module buffer (elk, nrst, resync, u_symboljn, uc_pilotJn, ui_datajn, 
uq_datajn, u_symbol_out, uc_pilot_out, ui_data_out, 
45 uq_data_out, got_phase); 

input elk, nrst, resync, u_symboMn, uc_pilotjn, got_phase; 
input [1-1:0] ui_datajn, uq_datajn; 
output u_symbol_out uc_pilot_out; 
50 output [1 1 :0] ui_data_out, uq_data_out; 

reg u_symbol_out, uc_pilot_out, accept; 
wire u_symbol_o, uc_pilot_o; 
reg [1 1 :0] ui_data_out, uq_data_out; 
5tD . wire [11:0] ui_data_o, uq_data_o; 
wire a, v; 
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wire [25:0] d; 

wire in_valid = u_symboMn || uc_pilot_in; 
wire rst = !nrst i | resync; 

5 

twowire26tw1 (.clk(clk), .rst(rst), .in_valid(in_valid), .din({u_symboi_in, 
uc_pilot_in, ui_data_in, uq_datajn}), .out_accept(a), 
.out_valid(v), .in_accept(), .dout(d), .set(1'b0)); 

10 

twowire26 tw2 (.clk(clk), .rst(rst), .in_valid(v), .din(d), 

.out_accept(accept), .out_valid(out_valid), .in_accept(a), 
.dout({u_symbol__o, uc_pilot_o, ui data o, uq data o}) ' 
.set(rbO)); " 

15 

always @ (u_symbol_o or uc_pilot_o or ui_data_o or uq_data_o or out_valid or 

accept) 
begin 

20 if (out_valid && accept) 
begin 

u_symboi_out = u_symbol_o; 

uc_pilot_out = uc_pilot_o; 

ui_data_out = ui_data_o; 
25 uq_data_out = uq_data_o; 
end 
else 
begin 

u_symbol_out = 0; 
30 uc_pilot_out = 0; 
ui_data_out = 0; 
uq_data_out = 0; 
end 
end 

35 

always @ (posedge elk) 
begin 

if (rst 1 1 got_phase) 
accept <= 1 ; 
40 else if (uc_pilot_out) 
accept <= 0; 
end 

endmodule 

45 

Listing 29 

//Sccsld: %W% %G% 

r ************************** w „** ********************** 

50 Copyright (c) 1997 Pioneer Digital Design Centre Limited 
****** ******** ************************_ MM/ 
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module divide (elk, go, numer, denom, answ, got); 
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— * *********** * 

this divider is optimised on the principal that the answer will always be 
less than 1 - ie denom > numer 



input elk, go; 

input [10:0] numer, denom; 

output got; 

output [10:0] answ; 

reg got; 

reg [10:0] answ; 

reg [20:0] sub, internal; 

reg [3:0] dcount; 



7 



always @ (posedge elk) 
begin 

if (go) 
20 begin 

dcount <= 0; 

internal <= numer << 10; 

sub <= denom << 9; 
end 

25 if (dcount < 11) 
begin 

if (internal > sub) 
begin 

internal <= internal - sub; 
30 answ[10 - dcount] <= 1; 
end 
else 
begin 

internal <= internal; 
35 answ[10 - dcount] <= 0; 
end 

sub <= sub » 1; 
dcount <= dcount + 1; 
40 end 

got <= (dcount == 10); 
end 

45 endmodule 

Listing 30 

• •// Sccsld: %W% %G% 
7 „ # 

50 Copyright (c) 1997 Pioneer Digital Design Centre Limited 
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module fserr_str (elk, nrst, resync, u_symbol t uc_pilot, ui_data. uq_data, guard, 
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freq_sweep, sr_sweep, lupdata, upaddr, upwstr, uprstr, upseM, 
upsel2 t rarn_di, te, tdin, freq_err, samp_err, rarrwnw, 
ram_addr, ram_do, tdout); 

5 input elk, nrst, resync, u_symbol, uc_pilot, upwstr, uprstr, te, tdin, upseM, 
upsel2; 
input [1:0] guard; 

input [3:0] freq_sweep, sr_sweep, upaddr; 

input [11:0] ui_data, uq^data; 
10 input [13:0] ram_do; 

output ram_rnw, tdout; 

output [9:0] ram_addr; 

output [12:0] freq_err, samp_err; 

output [13:0] ram_di; 
15 inout [7:0] lupdata; 

wire got_phase, en, load, symbol, u_symboLbuf, uc_piiot_buf; 

wire freq_open, sample_open; 

wire [1:0] guard_reg; 
20 wire [10:0] xcount; 

wire [11:0] ui_data_buf, uq_data_buf; 

wire [13:0] phasejn, phase_out; 

wire [20:0] acc_out_simple; 

wire [29:0] acc_out_prod; 
25 wire [12:0] freq_err_uf, samp_err_uf; 

wire [12:0] freq_err_fil, samp_err_fil, freq_twiddle, 
sample_twiddle; 

30 buffer buffer (.clk(clk), .nrst(nrst), .resync(resync), .u_symbol_in(u_symbol) I 
.uc_pilot_in(uc_pilot), .ui_data_Jn(ui_data), 
.uq_data_in(uq_data), .u_symbol_out(u_symbol_buf), 
.uc_pilot_out(uc_pilot_buf), .ui_data_out(ui_data_buf), 
.uq_data_out(uq_data_buf), .got_phase(got_phase)); ' 

35 

tan_tayior phase_extr (.clk(clk), .nrst(nrst), resync(resync), 
.uc_pilot(uc_pilot_buf), .ui_data(ui_data_buf), 
.uq_data(uq_data_buf), .phase(phase_in), 
.got_phase(got_phase)); 

addr_gen addr_gen (.clk(clk), .resync(resync), .u_symbol(u_symbol_buf), 
.uc_pilot(uc_pilot_buf), .got_phase(got_phase), .en(en), 
.load(load), .guard(guard), .addr(ram_addr), .xcount(xcount), 
.guard_reg(guard_reg), .symbol(symbol)); 

pilot_store pilot_store (.clk(clk), .en(en), .ram_do(ram_do), 
.phase_in(phase_in), ram_rnw(ram_mw), 
• .ram_di(ram_di), .phase_out(phase_out)); 

50 acc_simple acc_simple (.clk(clk), .resync(resync), .load(load), 
.symbol(symbol), .new_phase(phase_in), 
.old_phase(phase_out), .acc_out(acc_out_simple)); 

acc_prod acc_prod (.clk(clk), .resync(resync) t .load(load), 
55 .symbol(symbol), .new_phase(phase_in), 

.old_phase(phase_out), .xcount(xcount), 
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.acc_out(acc_out_prod)); 

slow_arith slow_arith (.acc_simple(acc_out_simple), .acc_prod(acc_out_prod), 
.guard(guard_reg), .freq_err_uf(freq_err_uf), 
.samp_err_uf(samp_errjjf)); 

avg_8 #(14) 

lpf_freq (xlk(clk), .resync(resync), .symbol(symbol), 
.in_data(freq_err_uf), .avg_out(freq_err_fil)); 

avg_8 #(14) 

lpf_samp (.clk(clk), .resync(resync), .symbol(symbol), 
.in_data(samp_errjjf), .avg_put(samp_err_fil)); 

15 /* median Jilter #(14) 

Ipfjreq (.clk(clk), .nrst(nrst), ,in__valid(symbol), 
.din(freq_err_uf), .dout(freq_err_fil)); 

median_filter #(14) 
20 lpf_samp (.clk(clk), .nrst(nrst), .in_valid(symbol), 

.din(samp_err_uf), .dout(samp_err_fil)); */ 

sweep_twiddle sweep_twiddle (.freq_err_fil(freq_err_fil), 
25 .samp_err_fil(samp_err_fil) t 

.freq_sweep(freq_sweep), 

,sr_sweep(sr_sweep), .freq_open(freq_open), 

.sample_open(sample_open), 

.freq__twiddle(freq_twiddle), 
30 .sample_twiddle(sample_twiddle), 

.freq_err_out(freq_err), 

.samp_err_out(samp_err)); 

lupidec lupidec (.clk(clk), .nrst(nrst),- .resync(resync), .upaddr(upaddr), 
35 .upwstr(upwstr), .uprstr(uprstr), Jupdata(lupdata), 

.freq_open(freq_open), .sampie_open(sample_open), 
.freq_twiddle(freq_twiddle), .sampie_twidd!e(sample_twiddle), 
.sample_loop_bw(), .freq_loop_bw(), .freq_err(freq_err), 
.samp_err(samp_err) 1 .f_err_update(), ,s_err_update());' 

40 

endmodule 

Listing 31 

//Sccsid: %W% %G% 
45 — 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
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module lupidec (elk, nrst, resync, upaddr, upwstr, uprstr, lupdata, freq_open, 
sample_open, freq_twiddle, sample_twiddle, sample_loop_bw, 
freq_loop_bw, freq_err, samp_err, f_err_update, 
s_err_update); 

input elk, nrst, resync, upwstr, uprstr, f_err_update, s_err_update; 



9NSDOCID" <WO 9ei9diOA_? ! ■> 



WO 98/19410 PCT/US97/1891 1 



256 



input [3:0] upaddr; 
input [12:0] freq_err, samp_err; 
inout [7:0] lupdata; 
output freq_open, sample_open; 
5 output [12:0] freq_twiddle, samplejwiddle, sample Joop_bw t freqJoop_bw; 

reg freq_open, sarnple_open; 

reg [12:0] freq_twiddle, sample_twiddle, sample_loop_bw, freq_loop_bw; 

10 wire wr_str; 

wire [3:0] wr_addr; 
wire [7:0] wr_data; 



15 TFOLDBEGINS 0 2 "address decode"*/ 

/*FOLDBEGINS 0 0 "read decode"*/ 

wire f_err_h_ren = (upaddr == 4'he); 

wire f_err_l_ren = (upaddr == 4'hf); 

wire s_err_h_ren = (upaddr == 4'hc); 
20 wire s_errj_ren = (upaddr -= 4'hd); 

wire f_twd_h_ren = (upaddr == 4'h4); 

wire f_Jwd_l_ren = (upaddr == 4'h5); 

wire s_twd _h_ren = (upaddr =- 4'h8); 

wire s_twd_l_ren = (upaddr == 4*h9); 
25 wire fjbwjwen = (upaddr == 4'h6); 

wire f_lbwj_ren = (upaddr == 4'h7); 

wire s_lbw_h_ren = (upaddr == 4'ha); 

wire s_lbw_l_ren = (upaddr == 4'hb); 

/*FOLDENDSV 

30 

TFOLDBEGINS 0 0 "write decode"*/ 

wire f_twd_h_wen = (wr_addr == 4*h4); 

wire f_twd_l_wen = (wr_addr == 4'h5); 

wire s_twd_h_wen = (wr_addr == 4'h8); 
35 wire s_twd_l_wen = (wr_addr == 4'h9); 

wire f_lbw_h_wen = (wr_addr == 4'h6); 

wire f_lbwj_wen = (wr_addr == 4'h7); 

wire sjbw_h_wen = (wr_addr == 4'ha); 

wire s_lbw_l_wen = (wr_addr == 4'hb); 
40 /*FOLDENDS*/ 

/*FOLDENDS*/ 

TFOLDBEGINS 0 2 "upi regs"*/ 
/*FOLDBEGINS 0 0 "freq error status reg "7 
45 upi_status_reg2 fr_err (.clk(cik), .nrst(nrst), .status__value({3'b0, freq_err}) ( 
.capture_strobe(f_err_update), .read^strobe(uprstr), 
.reg_selectj(f_errj_ren), Teg_select_h(f_errji_ren), 
Jupdata(lupdata)); 
/*FOLDENDS7 

50 

/*FOLDBEGINS 0 0 "sample error status reg"7 

upi_status_reg2 sr_err (.clk(clk), .nrst(nrst), .status_value({3'b0, samp_err}) 
.capture_strobe(s_err_update), .read_strobe(uprstr), 
.reg_select_l(s_errj_ren), .reg_select_h(s_err_h_ren), . 
55 .lupdata(lupdata)); 
TFOLDENDS7 
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TFOLDBEGINS 0 0 "control regs write latch"*/ 
upi_write_latch #(3) 

writejat (xlk(clk), .nrst(nrst), .lupdata(lupdata), .upaddr(upaddr), 
5 .write_strobe(upwstr), .write_data(wr_data), 

.write_address(wr addr), write sync(wr str)V 
/*FOLDENDS*/ ~ " 

/*FOLDBEGINS 0 0 "freq twiddle etc rdbk regs"*/ 
10 upi_rdbk_reg freq_r_upper ( control_value({freq_open, 2'bO, freq_twiddle[12:8]}) 
.read_strobe(uprstr), .reg_select(f_twd_h_ren), 
.lupdata(lupdata)); 

upi_rdbk_reg freq_r_lower (.control_value(freq_twiddle[7:0]), .read_strobe(uprstr) 
15 .reg_select(f_twd_l_ren), .lupdata(lupdata)); 

/'FOLDENDS*/ 

/*FOLDBEGINS 0 0 "samp twiddle etc rdbk regs"*/ 
upi_rdbk_reg samp_r_upper (.control_value({sample open, 2'bO 
20 sample_twiddle[12:8]}), 

.read_strobe(uprstr), .reg_select(s_twd_h_ren), 

.lupdata(lupdata)); 

upi_rdbk_reg samp_r_lower (.control_value(sample_twiddle[7:0]), 
25 .read_strobe(uprstr), 

.reg_select(s_twd_l_ren), .lupdata(lupdata)); 
TFOLDENDS*/ 

/*FOLDBEGINS 0 0 "freq loop bw rdbk regs"*/ 
30 upi_rdbk_reg fr_lp_r_upper (.control_value({3'b0, freq_loop_bw[12:8]}), 
.read_strobe(uprstr), .reg_select(f_lbw_h_ren), 
.lupdata(lupdata)); 

upi_rdbk_reg fr_lp_r_lower (.control_value(freq_loop_bw[7:0]), 
35 .read_strobe(uprstr), .reg_select(f_lbw_l_ren), 

.lupdata(lupdata)); 
/*FOLDENDS*/ 

/*FOLDBEGINS 0 0 "samp loop bw rdbk regs"*/ 
40 upi_rdbk_reg sr_lp_r_upper (.control_value({3'b0, sample_loop_bw[12:8]}), 
.read_strobe(uprstr), .reg_select(s_lbw_h_ren), 
.lupdata(lupdata)); 

upi_rdbk_reg sr_lp_r_lower (.control_value(sample_loop_bw[7:0]), 
45 .read_strobe(uprstr), .reg_select(s_lbw_l_ren), 

. .lupdata(lupdata)); • 
/*FOLDENDS*/ 
/*F0LDENDS7 

50 TFOLDBEGINS 0 2 "control regs"*/ 
always @ (posedge elk) 
begin 

if(lnrst) 

begin 

55 freq_open <- 0; 

sample_open <= 0; 
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freq_Jwiddle <= 0; 

sample_twiddle <= 0; 

sampleJoop_bw <= 0; //???? 

freqJoop_bw <= 0; //???? 
5 end 
else 
begin 

if (wr_str) 

begin 

10 if (f_twd_h_wen) 
begin 

freq_open <= wr_data[7]; 
freq_twiddle[12:8] <= wr_data[4:0]; 
end 



15 



30 



if (f_twd_l_wen) 

freq_twiddle[7:0] <= wr_data[7:0]; 



if (s_twd_h_wen) 
20 begin 

sample_open <= wr_data[7]; 

sample_twiddle[12:8] <= wr_data[4:0]; 
end 

25 if (s_twd_l_wen) 

sampie_twiddle[7:0] <= wr_data[7:0]; 



if (f_lbw_h_wen) 

freqJoop_bw[12:8] <= wr_data[4:0]; 
if (f_lbw_l_wen) 

freqjoop__bw[7:0] <= wr_data[7:0]; 



if (s_lbw_h_wen) 
35 sampleJoop_bw[12:8] <= wr__data[4:0]; 

if (s_lbwj_wen) 

samplejoop_bw[7:0] <= wr_data[7:0]; 

40 end 
end 
end 

TFOLDENDSV 
45 endmodule 

Listing 32 

// Sccsld: %W% %G% 
50 ************* 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
****************************** ************* *******, 
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module pilot_store (elk, en, ram_do t phase_in, rarrwnw, ram_di, phase_out); 

input elk, en; 
// input [9:0] addr; 
5 input [13:0] phase_in; 
input [13:0] ram_do; 
output ram_rnw; 

output [13:0] ram_di, phase_out; 

10 wire ram_rnw; 

// reg en_d1 ; 

// reg [9:0] addr_reg; 

//reg [13:0] mem [579:0]; 

reg [13:0] phase_put; //, phase_in_reg; 
15 wire [13:0] ram_di; 

always @ (posedge elk) 
begin 

20 //en_d1 <= en; 

if (en) 
begin 

// phase_in_reg <= phase_in; 
25 // addr_reg <= addr; 

phase_out <= ram_do; 
// phase__out <= memfaddr]; 
end 

//if(en_d1) 
30 // mem[addr_reg] <= phase_in_reg; 
end 



35 



assign ram_di = phase_in; 
assign ram_rnw = !en; 

endmodule 

Listing 33 

// Sccsld: %W% %G% 
40 /******* * ***************** ****** 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



45 



7 



module slow_arith (acc_simple, acc_prod, guard, freq_err_uf, samp_err_uf); 



input [1:0] guard; 
50 input [20:0] acc_simple; 
input [29:0] acc_prod; 
output [12:0] freq_err_uf, samp_err_uf; 

reg [12:0] freq_err_uf, samp_err_uf; 
55 reg [20:0] freq_scale; 
reg [38:0] inter_freq; 
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reg sign; 

reg [20:0] mod_acc; 

reg [38:0] mod_trunc_sat; 

reg [41:0] mod; 

5 

reg sign_a, sign_b, signjnter_sr; 
reg [20:0] mod_acc__s; 
reg [29:0] mod_acc_p; 
reg [35:0] a, mod_a; 
10 reg [35:0] b, mod_b; 

reg [36:0] mod_diff, diff; 

reg [46:0] inter_sr, mod_inter_sr; 



15 parameter sp = 45, acc_x = 33927, samp_scale = 1 rb101001001 10; 

always @ (guard) 
case (guard) 

2'bOO: freq_scale = 21 "b01 111010011111 0001 01 1 ■ //guard == 64 
20 2'b01: freq.scale = 21^011101101110001000011; //guard == 128 
2'b10: freq_scale = 21 'b01 1 100000100011 101010; //guard == 256 
2'b11: freq_scale = 21'b01 100101000011001 11 11; // guard == 512 
endcase 

25 always @ (acc_simple or freq_scale) 
begin 

sign = acc_simple[20]; 

mod_acc = sign ? (~acc_simple + 1) : acc_simple; 
30 mod = (freq_scale * mod_acc); 

// inter_freq = sign ? (-mod + 1) : mod; 

if (mod[41:38] > 0) 
begin 

35 mod _trunc_sat = 39'h3fffffffff; 

$display("freq_err saturated"); 
end 
else 

mod_trunc_sat = mod[38:0]; 

40 

inter_freq = sign ? (~mod_Jrunc_sat + 1) : mod_trunc_sat; 

freq_err_uf = inter_freq » 26; 
end 

45 

always @ (acc_simple or acc_prod) 
begin 

sign_a = acc_prod[29]; 
50 mod__acc_p = sign_a ? (~acc_prod + 1) ; acc_prod; 
mcd_a = sp * mod_acc_p; 
a = sign_a ? (~mod_a + 1) : mod_a; 

sign__b = acc_simple[20]; 
55 mod_acc_s = sign_b ? (~acc_simple + 1) : acc_simple; 
mod_b = acc_x * mod_acc_s; 
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b = sign_b ? (~mod_b + 1 ) : mod_b; 

diff = {a[35] t a} - {b[35], b}; // sign extend 

5 sign_inter_sr = diff[36]; 

mod_diff = sign_inter_sr ? (-diff + 1) : diff; 

mod_inter_sr = (mod_diff * samp_scale); 

inter_sr = sign_inter_sr ? (~mod_inter_sr + 1) : mod_inter_sr; 

10 samp_errjjf = inter_sr >> 34; //Hscaling!! 
end 

endmodule 

1 5 Listing 34 

//Sccsld: %W% %G% 

— *********************** w ********** 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



module sweep_twiddle (freq_err_fil, samp_err_fil, freq_sweep, sr_sweep t 
freq_open, sample_open, freq_twiddle, sample_twiddle, 
freq_err_out, samp_err_out); 

25 input freq_open, sample_open; 

input [3:0] freq_sweep f sr_sweep; 

input [12:0] freq_err_fil, samp_err_fil, freq_twiddie, sample_twiddle; 
output [12:0] freq_err_out, samp_err__out; 

30 reg [12:0] freq_err_out, sarnp_err_out; 

reg [12:0] freq_err_swept, samp_err_swept; 



always @ (freq_sweep or freq_err_fil) 
35 case (freq_sweep) 

4'bOOOO: freq__err_swept = freq_err_fil; 

4'b0001: freq_err_swept = freq_err_fil + 500; 

4'b0010: freq_err_swept = freq_err_fil + 1000; 

4'b0011: freq_err_swept = freq_err_fil + 1500; 
40 4'b0100: freq_err_swept = freq_err_fil + 2000; 

4'b0101: freq_err_swept = freq_err_fil + 2500; 

4'b0110: freq_err_swept = freq_err_fil + 3000; 

4'b01 1 1 : freq_err_swept = freq_err_fil + 3500; 

default: freq_err_swept = freq_err_fil; 
45 e.ndcase 

always @ (sr_sweep or samp_err__fil) 
case (sr_sweep> 

4'bOOOO; samp_err_swept = samp_err_fil; 
50 4'b0001: samp_err_swept = samp_err_fil + 500; 

4'b0010: samp_err_swept = samp_err_fil - 500; 

4'bOOH: samp_err_swept = samp__err_fil + 1000; 

4'b0100: samp_err_swept = samp_err_fil - 1000; 

4'b0101: samp_err_swept = samp_err_fil + 1500; 
55 4'b01 10: samp_err_swept = samp_err_fil - 1500;' 

4'b0111: samp_err_swept = samp_err_fil + 2000; 
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4'b1000: samp_err_swept = samp_err_fil - 2000; 
default: samp_err_swept = samp_err__fil; 
endcase 

always @ (freq__err_swept or freq_open or freq_twiddle) 
if (freq_open) 

freq_err_out = freq_twiddle; 
else 

freq_err_out = freq_err_swept + freq_twiddle; 



always @ (samp_err_swept or sample_open or sample_twiddle) 
if (sample_open) 
samp_err_out = sample_twiddle; 
else 

15 samp_err_out = samp_err_swept + sample_Jwiddle; 
endmodule 

20 Listing 35 

// Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
25 * 



module tan_taylor (elk, nrst, resync, uc_pilot, ui_data, uq_data, phase, 
30 got_phase); 

input elk, nrst, resync, uc_pilot; 
input [1 1 :0] ui_data, uq^data; 
output got_phase; 
35 output [13:0] phase; 

reg got_phase; 
reg [13:0] phase; 

reg add, qgti, modqeqi, i_zero_reg, q_zero_reg, go; 
40 reg [1:0] quadrant; 

reg [6:0] count, count_d1; 

reg [10:0] modj, mod_q, coeff, numer, denom; 

reg [21 :0] x_sqd, x_pow, nextjerrn, sum, flip, next_term_.unshift, prev sum 
x_sqd_unshift, x_pow_unshift; ~ 
45 wire got; 

wire [10:0] div; 



parameter pi = 6434, pi_over2 ■= 3217, mir.us_pi_o2 = 13167, pi_over4 = i609v 
divide divl (elk, go, numer, denom, div, got); 



always @ (posedge elk) 
begin 

55 if (Inrst 1 1 resync) 

count <= 7*1111111; 



WO 98/19410 





PCT/US97/18911 



263 



5 



10 



15 



20 



25 



30 



35 



40 



45 



50 



else 
begin 

if (uc_pilot) 
begin 

mod_i <= ui_data[11] ? (~ui_data[10:0] + 1) ; ui_data[10:0]; 
mod_q <= uq_data[11] ? (-uq_data[10:0] + 1) : uq_data[10:0]; 
quadrant <= {uq_data[1 1], ui_data[1 1]}; 
count <= 0; 
go <= 0; 
end 

else 
begin 

if (count == 0) 
begin 

qgti <= (mod_q > mod_i); 
modqeqi <= (mod_q == mod J); 
i_zero_reg <= (mod_i == 0); 
q_zero_reg <= (mod__q == 0); 
add <= 0; 
go <= 1; 
count <= 1 ; 
end 

if ((count >= 3) && (count < 71)) 
count <= count + 2; 

if (count == 1) 
begin 

go <= 0; . . 

if (got) *>• 
begin 

sum <= div; 
x_pow <= div; 

x_sqd <= x_sqd_unshift » 11; 

count <= 3; 
end 
end 

if ((count > 1) && (count < 69)) 

x_pow <= x_pow_unshift » 1 1 ; 
if ((count > 3) && (count < 69)) 

next_term <= next_Jerm_unshift >> 12; 
if ((count > 5) && (count < 69)) 
begin 

prev_sum <= sum; • 

sum <= add ? (sum + nextjerm) : (sum - next term)- 
add <=.!add; . ■ 

end 

end 

if (count == 67) 

sum <= (prev_sum + sum) >> 1; 
if (count == 69) 

casex ({i_zero_reg, q_zero_reg, qgti, modqeqi, quadrant}) 
6'b1xx0_0x: phase <= pi_over2; 
6 , b1xx0_1x: phase <= minus_pi_o2; 
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6'b01x0_x0: phase <= 0; 
6'b01x0_x1: phase <= pi; 

6'b0010_00: phase <= {2'b00, fiip[11:0]}; 
6'b0010_01: phase <= pi - {2'b00, fiip[11:0]}; 
6'b001 0_1 0: phase <= 0 - {2'bOO, flip[1 1 :0]}; 
6'b001 0_1 1 : phase <= {2'bOO, flip[1 1 :0]} - pi; 

6'b0000_00: phase <= {2'bOO, sum[11:0]}; 
6'b0000_01: phase <= pi - {2'bOO, sum[1 1:0]}; 
6'b0000_10: phase <= 0 - {2'bOO, sump 1:0]}- 
6'b0000_1 1 : phase <= {2'bOO, sum[1 1 :0]} - pi; 

6'bxxx1_00: phase <= pi_over4; 
6'bxxx1_01: phase <= pi - pi_over4; 
6'bxxx1_10: phase <= 0 - pi_over4; 
6'bxxx1_1 1: phase <= pi_over4 - pi; 
endcase 

count_d1 <= count; 
got_phase <= (count == 69); 
end 
end 

always @ (div) 

x_sqd_unshift = div * div; // had to do this in order to stop synthesis throwing away! 
always @ (x_pow or coeff) 

next_term_unshift = (x_pow * coeff); // compass dp_cell mult_booth_csum 
always @ (x_pow or x_sqd) 

x_pow_unshift = (x_pow * x_sqd); // compass dp_cell mult_booth_csum 

always @ (count_d1) 
case (count_d1) 

3: coeff = 1 1'b10101010101; 

5: coeff = 11'b011 001 10011; 

7: coeff = 11'b01001001001; 

9: coeff = 11'b001 110001 11; 

11: coeff = 11'b00101 110100; 

13: coeff = 11'b001001 11011; 

15: coeff = 11"b00100010001; 

17: coeff = 11'b0001 11 10001; 

19: coeff = irb00011010111; 

21: coeff = 11'b0001 1000011; 

23: coeff = 11'b0001011 0010; 

25: coeff = 1 1'b0001010001 1; 

27: coeff = 11'b00010010111; 

29: coeff = 11'b0001 000 1101; 

31: coeff = 1 1'b0001 0000 100; 

33: coeff = 1 1'b00001 1 11 1 00; 

35: coeff = 11'b00001110101; 

37: coeff = 1 1'b00001 101 110; 

39: coeff = 11'b00001 101001; 

41 : coeff = 1 1 'b00001 1 001 00; 

43: coeff = 1 1 'b00001 01 1111; 
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45: coeff 
47: coeff 
49: coeff 
51: coeff 
53: coeff 
55: coeff 
57: coeff 
59: coeff 
61: coeff 
63: coeff 



11'b00001011011 
11'b00001010111 
11'b00001010011 
11'b00001010000 
11'b00001001101 
11'b00001001010 
11'b00001000111 

irbooooioooioi 

11"b00001 000011; 
11'b00001 000001; 



// 65: coeff = 1 1 "b000001 11111 
// 67: coeff = 1 1 'b000001 11101 
//69: coeff = 11'b00000111011 
//71: coeff = 11"b000001 11001 
15 // 73: coeff = 11'b000001 11000 
//75: coeff = 1 1'b000001 101 10 
//77: coeff = 1 1'b000001 10101 
default: coeff = 1 1'bx; 
endcase 



always @ (mod_q or mod_i or qgti) 
begin 

numer = qgti ? mod_i : mod_q; 
denom = qgti ? mod_q : mod_i; 
25 end 

always @ (sum) 
flip = pi_over2 - sum; 

30 // always @ (got) 
// if (got) 

// $display("numer was %d, denom was %d, div then %d", numer, denom, div); 
// always @ (count) 

35 // if (count < 68 ) $display("as far as x to the %0d term, approx = %d", (count-6), 
sum); 

always @ (got_phase) 
begin: display 
40 reg [13:0] real_phase; 

if (phase[13]) 
begin 

real_phase = (~phase +1); 
45 if (got_phase) $display("%t: got phase, phase = -%0d", $time, real_phase);. 
end 
else 
• begin 

if (got_phase) $display("%t: got phase, phase = %0d", Stime, phase); 
50 end 

end // display 

endmodule 



20 
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While this invention has been explained with reference to the structure disclosed 
herein, it is not confined to the details set forth and this application is intended to cover 
any modifications and changes as may come within the scope of the following claims: 
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CLAIMS 



1 1 . A digital receiver for multicarrier signals comprising: 

2 an amplifier accepting an analog multicarrier signal, wherein said multicarrier 

3 signal comprises a stream of data symbols having a symbol period T s , wherein the 

4 symbols comprise an active interval, a guard interval, and a boundary therebetween, 

5 said guard interval being a replication of a portion of said active interval; 

6 an analog to digital converter coupled to said amplifier; 

7 an l/Q demodulator for recovering in phase and quadrature components from 

8 data sampled by said analog to digital converter; 

9 an automatic gain control circuit coupled to said analog to digital converter for 

10 providing a gain control signal for said amplifier; 

11 a low pass filter circuit accepting I and Q data from said l/Q demodulator, wherein 

12 said I and Q data are decimated; 

13 a resampling circuit receiving said decimated I and Q data at a first rate and 

14 outputting resampled I and Q data at a second rate; 

15 an FFT window synchronization circuit coupled to said resampling circuit for 

16 locating a boundary of said guard interval; 

17 a real-time pipelined FFT processor operationally associated with said FFT 

18 window synchronization circuit, wherein said FFT processor comprises at least one 

19 stage, said stage comprising: 

20 a complex coefficient multiplier; and 

21 a memory having a lookup table defined therein for multiplicands being 

22 multiplied in said complex coefficient multiplier, a value of each said multiplicand 

23 being unique in said lookup table; and 

24 a monitor circuit responsive to said FFT window synchronization circuit for 

25 detecting a predetermined event, whereby said event indicates that a boundary between 

26 an active symbol and a guard interval has been located. 

1 2. The receiver according to claim 1 , wherein said FFT window synchronization 

2 circuit comprises: 

3 a first delay element accepting currently arriving resampled I and Q data, qnd 

4 outputting delayed resampled I and Q data; 

5 a subtracter, for producing a difference signal representative of a difference 

6 between said currently arriving resampled I and Q data and said delayed resampled I 

7 and Q data; 
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8 a first circuit for producing an output signal having a unipolar magnitude that is 

9 representative of said difference signal of said subtracter; 

1 0 a second delay element for storing said output signal of said first circuit; 

1 1 a third delay element receiving delayed output of said second delay element; and 

12 a second circuit for calculating a statistical relationship between data stored in 

1 3 said second delay element and data stored in said third delay element and having an 

14 output representative of said statistical relationship. 

1 3. The receiver according to claim 2, wherein said statistical relationship 

2 comprises an F ratio. 

1 4. The receiver according to claim 1, wherein said FFT processor operates in an 

2 8K mode. 

1 5. The receiver according to claim 1 , wherein said wherein said FFT processor 

2 further comprises an address generator for said memory, said address generator 

3 accepting a signal representing an order dependency of a currently required multipli- 

4 cand, and outputting an address of said memory wherein said currently required 

5 multiplicand is stored. 

1 6. The receiver according to claim 5, wherein each said multiplicand is stored in 

2 said lookup table in order of its respective order dependency for multiplication by said 

3 complex coefficient multiplier, said order dependencies of said multiplicands defining an 

4 incrementation sequence, and said address generator comprises: 

5 an accumulator for storing a previous address that was generated by said 

6 address generator; 

7 a circuit for calculating an incrementation value of said currently required 

8 multiplicand; and 

9 an adder for adding said incrementation value to said previous address. 

1 7. The receiver according to claim 6, 'wherein said lookup table comprises a 

2 plurality, of rows,, and said incrementation sequence comprises a plurality of 

3 incrementation sequences, said multiplicands being stored in row order, wherein 

4 in a first row a first incrementation sequence is 0; 

5 in a second row a second incrementation sequence is 1; 

6 in a third row first and second break points B1, B2 of a third incrementation 

7 sequence are respectively determined by the relationships 
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10 ; and 

11 in a fourth row a third break point B3 of a third incrementation sequence is 

12 determined by the relationship 
13 

B3 M = 2 x 4 N + 2 

m N 

14 wherein M N represents the memory of an Nth stage of said FFT processor. 

1 8. The receiver according to claim 1 , further comprising channel estimation and 

2 correction circuitry comprising: 

3 pilot location circuitry receiving a transformed digital signal representing a frame 

4 from said FFT processor for locating pilot carriers therein, wherein said pilot carriers are 

5 spaced apart in a carrier spectrum of said transformed digital signal at intervals K and 

6 have predetermined magnitudes, said pilot location circuitry comprising: 

7 a first circuit for computing an order of carriers in said transformed digital signal 

8 modulo K; 

9 K accumulators coupled to said second circuit for accumulating magnitudes of 

10 said carriers in said transformed digital signal, said accumulated magnitudes defining 

11 a set; and 

1 2 a correlation circuit for correlating K sets of accumulated magnitude values with 

13 said predetermined magnitudes, wherein a first member having a position calculated 

14 modulo K in each of said K sets is uniquely offset from a start position of said frame. 

1 9. The receiver according to claim 8, wherein said pilot location circuitry further 

2 comprises a bit reversal circuit for reversing a bit order of said transformed digital signal. 

1 . . 10 - T he receiver according to claim 7, wherein said magnitudes of said camera 

2 and said predetermined magnitudes are amplitudes. 

1 11. The receiver according to claim 7, wherein said magnitudes of said carriers 

2 and said predetermined magnitudes are absolute values. 
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1 12. The receiver according to claim 7, wherein said correlation circuitry further 

2 comprises a peak tracking circuit for determining a spacing between a first peak and a 

3 second peak of said K sets of accumulated magnitudes. 

1 13. The receiver according to claim 7, wherein said channel estimation and 

2 correction circuitry further comprises: 

3 an interpolating filter for estimating a channel response between said pilot 

4 carriers; and 

5 a multiplication circuit for multiplying data carriers output by said FFT processor 

6 with a correction coefficient produced by said interpolating filter. 

1 14. The receiver according to claim 7, wherein said channel estimation and 

2 correction circuitry further comprises 

3 a phase extraction circuit accepting a data stream of phase-uncorrected I and Q 

4 data from said FFT processor, and producing a signal representative of a phase angle 

5 of said uncorrected data, said phase extraction circuit including an accumulator for 

6 accumulating the phase angles of succeeding phase-uncorrected I and Q data. 

1 15. The receiver according to claim 14, said channel estimation and correction 

2 circuitry further comprises: 

3 an automatic frequency control circuit coupled to said phase extraction circuit 

4 and said accumulator, comprising; 

5 a memory for storing an accumulated common phase error of a first symbol 

6 carried in said phase-uncorrected I and Q data; 

7 wherein said accumulator is coupled to said memory and accumulates a 

8 difference between a common phase error of a plurality of pilot carriers in a second 

9 symbol and a common phase error of corresponding pilot carriers in said first symbol; 
10 an output of said accumulator being coupled to said l/Q demodulator. 

1 16. The receiver according to claim 15, whferein said coupled output of said 

2 accumulator is enabled in said l/Q demodulatoronly during reception of a guard interval • 

3 therein. 



1 

2 
3 



17. The receiver according to claim 14, said channel estimation and correction 
circuitry further comprises an automatic sampling rate control circuit coupled to said 
phase extraction circuit, comprising: 
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4 a memory for storing accumulated phase errors of pilot carriers in a first symbol 

5 carried in said phase-uncorrected I and Q data; 

6 wherein said accumulator is coupled to said memory and accumulates 

7 differences between phase errors of pilot carriers in a second symbol and phase errors 

8 of corresponding pilot carriers in said first symbol to define a plurality of accumulated 

9 intersymbol carrier phase error differentials, a phase slope being defined by a difference 

10 between a first accumulated intersymbol carrier phase differential and a second 

1 1 accumulated intersymbol carrier phase differential; 

12 an output of said accumulator being coupled to said l/Q demodulator. 

1 18. The receiver according to claim 17, wherein said sampling rate control circuit 

2 stores a plurality of accumulated intersymbol carrier phase error differentials and 

3 computes a line of best fit therebetween. 

1 1 9. The receiver according to claim 1 7, wherein said coupled output signal of said 

2 accumulator is enabled in said resampling circuit only during reception of a guard 

3 interval therein. 

1 20. The receiver according to claim 17, wherein a common memory for storing 

2 output of said phase extraction circuit is coupled to said automatic frequency control 

3 circuit and to said automatic sampling rate control circuit. 

1 21. The receiver according to claim 14, wherein said phase extraction circuit 

2 further comprises: 

3 a pipelined circuit for iteratively computing the arctangent of an angle of rotation 

4 according to the series 



5 



, v 3 X 5 v 7 Y 9 

tan" 1 {x) = x--^-+iL_-^_ + 2^ . , <1 

3 5 7 9 
wherein x is a ratio of said phase-uncorrected I and Q data. 



1 . 22. The receiver according to claim 21, wherein said pipelined circuit comprises: 

2 a constant coefficient multiplier; and 

3 a multiplexerfor selecting one of a plurality of constant coefficients of said series, 

4 an output of said multiplexer being connected to an input of said constant coefficient 

5 multiplier. 
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1 23. The receiver according to claim 21, wherein said pipelined circuit comprises: 

2 a multiplier; 

3 a first memory for storing the quantity x 2 , said first memory being coupled to a 

4 first input of said multiplier; 

5 a second memory for holding an output of said multiplier; and 

6 a feedback connection between said second memory and a second input of said 

7 multiplier. 



1 24. The receiver according to claim 21, wherein said pipelined circuit further 

2 comprises: 

3 a third memory for storing a value of said series; 

4 a control circuit, coupled to said third memory, wherein said pipeline circuit 

5 computes N terms of said series, and said pipeline circuit computes N+1 terms of said 

6 series, wherein N is an integer; 

7 an averaging circuit coupled to said third memory for computing an average of 

8 said N terms and said N+1 terms of said series. 



1 25. The receiver according to claim 1 , wherein data transmitted in a pilot carrier 

2 of said multicarrier signal is BCH encoded according to a code generator polynomial 

3 h(x), further comprising: 

4 a demodulator operative on said BCH encoded data; 

5 an iterative pipelined BCH decoding circuit, comprising: 

6 a circuit coupled to said demodulator for forming a Galois Field of said 

7 polynomial, and calculating a plurality of syndromes therewith; 

8 a plurality of storage registers, each said storage register storing a 

9 respective one of said syndromes; 

10 a plurality of feedback shift registers, each said feedback shift register 

11 accepting data from a respective one of said storage registers and having an 

12 output; 

1 3 , a. plurality of Galois field multipliers, each said multiplier being connected 

14 in a feedback loop across a respective one of said feedback shift registers and 

1 5 multiplying the output of its associated feedback shift register by an alpha value 

16 of said Galois Field; 

17 an output Galois field multiplier for multiplying said outputs of two of said 

18 feedback shift registers; 
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19 an error detection circuit connected to said feedback shift registers and 

20 said output Galois field multiplier, wherein an ouput signal of said error detection 

21 circuit indicates an error in a current bit of data; and 

22 a feedback line enabled by said error detection circuit and connected to 

23 said storage registers, wherein outputs of said feedback shift registers are written 

24 into said storage registers, 

1 26. The receiver according to claim 25, wherein said output Galois field multiplier 

2 comprises: 

3 a first register initially storing a first multiplicand A; 

4 a constant coefficient multiplier connected to said register for multiplication by a 

5 value a, an output of said constant coefficient multiplier being connected to said first 

6 register to define a first feedback loop, whereby in a kth cycle of clocked operation said 

7 first register contains a Galois field product Aa k ; 

8 a second register for storing a second multiplicand B; 

9 an AND gate connected to said second register and to said output of said 

10 constant coefficient multiplier; 

1 1 an adder having a first input connected to an output of said AND gate; 

12 an accumulator connected to a second input of said adder; wherein an output of 

13 said adder is connected to said accumulator to define a second feedback loop; 

14 whereby a Galois field product AB is output by said adder. 

1 27. A method for estimation of a frequency response of a channel, comprising the 

2 steps of: 

3 receiving from a channel a multicarrier signal having a plurality of data carriers 

4 and scattered pilot carriers, said scattered pilot carriers being spaced apart at a first 

5 interval N and being transmitted at a power that differs from a transmitted power of said 

6 data carriers; 

7 converting said multicarrier signal to a digital representation thereof; 

8 performing a Fourier transform on said digital representation of said multicarrier 

9 signal to generate a transformed digital signal; 

10 reversing a bit order of said transformed digital signal to generate a bit-order 

1 1 reversed signal; 

12 cyclically accumulating magnitudes of carriers in said bit-order reversed signal 

13 in N accumulators; 

14 correlating said accumulated magnitudes with said power of said scattered pilot 

15 carriers; 



BNSDOCID" <WO 9Sl?diOA5 | > 




WO 98/19410 PCT/US97/18911 



274 

16 responsive to said step of correlating, generating a synchronizing signal that 

17 identifies a carrier of said multicarrier signal. 

1 28. The method according to claim 27, wherein said step of accumulating 

2 magnitudes comprises the steps of: 

3 adding absolute values of a real component of said bit-order reversed signal to 

4 respective absolute values of imaginary components thereof to generate sums; 

5 respectively storing said sums in said accumulators. 

1 29. The method according to claim 27, wherein said step of correlating said 

2 accumulated magnitudes further comprises the step of: 

3 identifying a first accumulator having a highest value stored therein representing 

4 a first carrier position. 

1 30. The method according to claim 29, wherein said step of correlating said 

2 accumulated magnitudes further comprises the steps of: 

3 identifying a second accumulator having a second highest value stored therein 

4 representing a second carrier position; and 

5 determining an interval between said first carrier position and said second carrier 

6 position. 

1 31 The method according to claim 27, further comprising the steps of: 

2 comparing a position of a carrier of a first symbol in said bit-order reversed signal 

3 with a position of a carrier of a second symbol therein. 

1 32. The method according to claim 27, further comprising the steps of: 

2 interpolating between pilot carriers to determine correction factors for respective 

3 intermediate data carriers disposed therebetween; and 

4 respectively adjusting magnitudes of said intermediate data carriers according 

5 to said correction factors. 

1 33. The methpd according to claim 27, further comprising the steps of: 

2 determining a mean phase difference between corresponding pilot carriers of 

3 successive symbols being transmitted in said transformed digital signal; and 

4 generating a first control signal responsive to said mean phase difference; and 

5 responsive to said first control signal adjusting a frequency of reception of said 

6 multicarrier signal. 
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7 34. The method according to claim 33, further comprising the steps of: 

8 determining a first phase difference between a first data carrier of a first symbol 

9 in said transmitted data carrier and said first data carrier of a second symbol therein; 

1 0 determining a second phase difference between a second data carrier of said first 

1 1 symbol and said second data carrier of said second symbol; and 

12 determining a difference between said first phase difference and said second 

1 3 phase difference to define a phase slope between said first data carrier and said second 

14 data carrier; 

15 generating a second control signal responsive to said phase slope; and 

16 responsive to said second control signal adjusting a sampling frequency of said 

1 7 multicarrier signal. 

18 35. The method according to claim 34, wherein said step of determining a 

19 difference between said first phase difference and said second phase difference 

20 comprises computing a line of best fit. 
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